[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 693929bf48: Make crm-default-separator obsolete as per FIXME
From: |
Stefan Kangas |
Subject: |
master 693929bf48: Make crm-default-separator obsolete as per FIXME |
Date: |
Mon, 11 Jul 2022 06:10:44 -0400 (EDT) |
branch: master
commit 693929bf48be866763edd5bc2b6e2745bec134cf
Author: Stefan Kangas <stefan@marxist.se>
Commit: Stefan Kangas <stefan@marxist.se>
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.
---
lisp/emacs-lisp/crm.el | 12 ++++--------
1 file changed, 4 insertions(+), 8 deletions(-)
diff --git a/lisp/emacs-lisp/crm.el b/lisp/emacs-lisp/crm.el
index 9d9c91e510..9c49e09578 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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 693929bf48: Make crm-default-separator obsolete as per FIXME,
Stefan Kangas <=