diff options
| author | Juri Linkov <juri@jurta.org> | 2010-03-14 23:15:02 +0200 |
|---|---|---|
| committer | Juri Linkov <juri@jurta.org> | 2010-03-14 23:15:02 +0200 |
| commit | 88f4758e1c0051fb9c82630f3f816e4efb28b0b0 (patch) | |
| tree | 9eee016387b0ea846be67613f03d7e362eb0e672 /lisp/emacs-lisp/lisp-mnt.el | |
| parent | 7725ebb79404d8ea340632b4cc045e768b59d1ff (diff) | |
| download | emacs-88f4758e1c0051fb9c82630f3f816e4efb28b0b0.tar.gz | |
Fix keywords.
* finder.el (finder-compile-keywords): Replace `princ' with
`prin1' on a list of symbols interned from keyword strings.
* emacs-lisp/lisp-mnt.el (lm-keywords-list): If `keywords' contains
a comma, then split keywords using a comma and optional whitespace.
Otherwise, split by whitespace.
* complete.el:
* face-remap.el:
* log-view.el:
* net/hmac-def.el:
* net/hmac-md5.el:
* net/netrc.el:
* progmodes/mixal-mode.el: Fix keywords.
Diffstat (limited to 'lisp/emacs-lisp/lisp-mnt.el')
| -rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index 8a1c753f5f6..10b7baf294f 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -458,7 +458,9 @@ each line." "Return list of keywords given in file FILE." (let ((keywords (lm-keywords file))) (if keywords - (split-string keywords "[, \t\n]+" t)))) + (if (string-match-p "," keywords) + (split-string keywords ",[ \t\n]*" t) + (split-string keywords "[ \t\n]+" t))))) (defvar finder-known-keywords) (defun lm-keywords-finder-p (&optional file) |