diff options
| author | Stefan Kangas <stefan@marxist.se> | 2021-12-26 21:59:16 +0100 |
|---|---|---|
| committer | Stefan Kangas <stefan@marxist.se> | 2022-07-11 12:10:36 +0200 |
| commit | 693929bf48be866763edd5bc2b6e2745bec134cf (patch) | |
| tree | 35d5c0df0ebd3b3f61331ef9a0e32e0ac847db9b | |
| parent | d8225e9fa1e68ff4e38f149838ae0a72853b2f2b (diff) | |
| download | emacs-693929bf48be866763edd5bc2b6e2745bec134cf.tar.gz | |
Make crm-default-separator obsolete as per FIXME
* lisp/emacs-lisp/crm.el (crm-default-separator): Make into
obsolete variable alias for crm-separator.
(crm-separator): Update docstring for above change.
| -rw-r--r-- | lisp/emacs-lisp/crm.el | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el index 9d9c91e510e..9c49e095783 100644 --- a/lisp/emacs-lisp/crm.el +++ b/lisp/emacs-lisp/crm.el @@ -77,15 +77,9 @@ ;;; Code: -;; FIXME I don't see that this needs to exist as a separate variable. -;; crm-separator should suffice. -(defconst crm-default-separator "[ \t]*,[ \t]*" - "Default value of `crm-separator'.") - -(defvar crm-separator crm-default-separator +(defvar crm-separator "[ \t]*,[ \t]*" "Separator regexp used for separating strings in `completing-read-multiple'. -It should be a regexp that does not match the list of completion candidates. -The default value is `crm-default-separator'.") +It should be a regexp that does not match the list of completion candidates.") (defvar-keymap crm-local-completion-map :doc "Local keymap for minibuffer multiple input with completion. @@ -300,6 +294,8 @@ with empty strings removed." ;(completing-read my-prompt my-table nil t) ;(completing-read my-prompt my-table nil "match") +(define-obsolete-variable-alias 'crm-default-separator 'crm-separator "29.1") + (provide 'crm) ;;; crm.el ends here |