diff options
| author | Roland Winkler <winkler@gnu.org> | 2013-03-17 05:33:57 -0500 |
|---|---|---|
| committer | Roland Winkler <winkler@gnu.org> | 2013-03-17 05:33:57 -0500 |
| commit | 9c44569ea2a18099307e0571d523d8637000a153 (patch) | |
| tree | 80b9fcf95775b28f814998633572f8bb8f4540bc /lisp/emacs-lisp/crm.el | |
| parent | 327f1f6f6d934e58921179275547b2d09f219f32 (diff) | |
| download | emacs-9c44569ea2a18099307e0571d523d8637000a153.tar.gz | |
completing-read-multiple: Ignore empty strings in the list of return values
Diffstat (limited to 'lisp/emacs-lisp/crm.el')
| -rw-r--r-- | lisp/emacs-lisp/crm.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index f88cb0ef9bb..e1e1847dd59 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -287,7 +287,8 @@ INHERIT-INPUT-METHOD." prompt initial-input map nil hist def inherit-input-method))) (and def (string-equal input "") (setq input def)) - (split-string input crm-separator))) + ;; Ignore empty strings in the list of return values. + (split-string input crm-separator t))) (remove-hook 'choose-completion-string-functions 'crm--choose-completion-string))) |