Mercurial > emacs

changeset 84872:b39ee0f351f1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(hi-lock-write-interactive-patterns): Use `mapc' rather than `mapcar'.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 25 Sep 2007 11:07:41 +0000
parents 534e99349c41
children c62cc793efc7
files lisp/hi-lock.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/hi-lock.el	Tue Sep 25 11:07:06 2007 +0000
+++ b/lisp/hi-lock.el	Tue Sep 25 11:07:41 2007 +0000
@@ -309,7 +309,7 @@
   Write active REGEXPs into buffer as comments (if possible).  They may
   be read the next time file is loaded or when the \\[hi-lock-find-patterns] command
   is issued.  The inserted regexps are in the form of font lock keywords.
-  (See `font-lock-keywords'.)  They may be edited and re-loaded with \\[hi-lock-find-patterns], 
+  (See `font-lock-keywords'.)  They may be edited and re-loaded with \\[hi-lock-find-patterns],
   any valid `font-lock-keywords' form is acceptable. When a file is
   loaded the patterns are read if `hi-lock-file-patterns-policy is
   'ask and the user responds y to the prompt, or if
@@ -515,7 +515,7 @@
   (if (null hi-lock-interactive-patterns)
       (error "There are no interactive patterns"))
   (let ((beg (point)))
-    (mapcar
+    (mapc
      (lambda (pattern)
        (insert (format "%s: (%s)\n"
 		       hi-lock-file-patterns-prefix