diff lisp/packages/font-lock.el @ 124:9b50b4588a93 r20-1b15

Import from CVS: tag r20-1b15
author cvs
date Mon, 13 Aug 2007 09:26:39 +0200
parents 8619ce7e4c50
children 1370575f1259
line wrap: on
line diff
--- a/lisp/packages/font-lock.el	Mon Aug 13 09:26:04 2007 +0200
+++ b/lisp/packages/font-lock.el	Mon Aug 13 09:26:39 2007 +0200
@@ -1101,8 +1101,6 @@
   (let* ((match (nth 0 highlight))
 	 (start (match-beginning match)) (end (match-end match))
 	 (override (nth 2 highlight)))
-    (and end
-	 (goto-char end)) ;; tlp00 hack to allow for back to back fonts
     (let ((newface (nth 1 highlight)))
       (or (symbolp newface)
 	  (setq newface (eval newface)))