summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorTed Zlatanov <tzz@lifelogs.com>2013-12-04 16:32:05 -0500
committerTed Zlatanov <tzz@lifelogs.com>2013-12-04 16:32:05 -0500
commit39eb08995a79187ae645e06ed74953af0184c497 (patch)
tree478feed85cacb3dae25e05d3f1e67b3b7633d3e3 /lisp/emacs-lisp
parent22800ae936f67b7d0e4c565061aa24d99a4f1010 (diff)
downloademacs-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.el4
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)