X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/732fd4c7e11debd61c97eaaba3038d61e6ec7024..b895c72059521fec064ff27b4cfcfa4104081c4e:/lisp/emacs-lisp/crm.el diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index f516e78c8c..035baa0a96 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -1,6 +1,6 @@ ;;; crm.el --- read multiple strings with completion -;; Copyright (C) 1985-1986, 1993-2015 Free Software Foundation, Inc. +;; Copyright (C) 1985-1986, 1993-2016 Free Software Foundation, Inc. ;; Author: Sen Nagata ;; Keywords: completion, minibuffer, multiple elements @@ -128,8 +128,8 @@ A value of nil specifies `try-completion'. A value of t specifies `all-completions'. A value of lambda specifies a test for an exact match. For more information on STRING, PREDICATE, and FLAG, see the Elisp -Reference sections on 'Programmed Completion' and 'Basic Completion -Functions'." +Reference sections on “Programmed Completion” and “Basic Completion +Functions”." (let ((beg 0)) (while (string-match crm-separator string beg) (setq beg (match-end 0)))