From 39eb08995a79187ae645e06ed74953af0184c497 Mon Sep 17 00:00:00 2001 From: Ted Zlatanov Date: Wed, 4 Dec 2013 16:32:05 -0500 Subject: Trim whitespace in lm-keywords-list * emacs-lisp/lisp-mnt.el (lm-keywords-list): Trim whitespace around keywords with extra `split-string' argument. --- lisp/emacs-lisp/lisp-mnt.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/emacs-lisp/lisp-mnt.el') 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) -- cgit v1.2.3