diff options
author | Ted Zlatanov <tzz@lifelogs.com> | 2013-12-04 16:32:05 -0500 |
---|---|---|
committer | Ted Zlatanov <tzz@lifelogs.com> | 2013-12-04 16:32:05 -0500 |
commit | 39eb08995a79187ae645e06ed74953af0184c497 (patch) | |
tree | 478feed85cacb3dae25e05d3f1e67b3b7633d3e3 /lisp/emacs-lisp | |
parent | 22800ae936f67b7d0e4c565061aa24d99a4f1010 (diff) | |
download | emacs-39eb08995a79187ae645e06ed74953af0184c497.tar.gz emacs-39eb08995a79187ae645e06ed74953af0184c497.tar.bz2 emacs-39eb08995a79187ae645e06ed74953af0184c497.zip |
Trim whitespace in lm-keywords-list
* emacs-lisp/lisp-mnt.el (lm-keywords-list): Trim whitespace
around keywords with extra `split-string' argument.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/lisp-mnt.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el index f2e691102d4..8e8b8747a29 100644 --- a/lisp/emacs-lisp/lisp-mnt.el +++ b/lisp/emacs-lisp/lisp-mnt.el @@ -461,8 +461,8 @@ each line." (let ((keywords (lm-keywords file))) (if keywords (if (string-match-p "," keywords) - (split-string keywords ",[ \t\n]*" t) - (split-string keywords "[ \t\n]+" t))))) + (split-string keywords ",[ \t\n]*" t "[ ]+") + (split-string keywords "[ \t\n]+" t "[ ]+"))))) (defvar finder-known-keywords) (defun lm-keywords-finder-p (&optional file) |