Commit c516e98e authored by Dave Love's avatar Dave Love

(imenu--generic-function): Use mapc to iterate over

syntax characters.
parent 446809ab
......@@ -795,8 +795,9 @@ PATTERNS."
;; The character(s) to modify may be a single char or a string.
(if (numberp (caar slist))
(modify-syntax-entry (caar slist) (cdar slist) table)
(dolist (c (caar slist))
(modify-syntax-entry c (cdar slist) table)))
(mapc (lambda (c)
(modify-syntax-entry c (cdar slist) table))
(caar slist)))
(setq slist (cdr slist)))
(goto-char (point-max))
(imenu-progress-message prev-pos 0 t)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment