diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/progmodes/hideif.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/progmodes/hideif.el b/lisp/progmodes/hideif.el index aabc2f5783c..da6b6f772b6 100644 --- a/lisp/progmodes/hideif.el +++ b/lisp/progmodes/hideif.el | |||
| @@ -958,7 +958,10 @@ Return as (TOP . BOTTOM) the extent of ifdef block." | |||
| 958 | 958 | ||
| 959 | (defun hide-ifdef-use-define-alist (name) | 959 | (defun hide-ifdef-use-define-alist (name) |
| 960 | "Set `hide-ifdef-env' to the define list specified by NAME." | 960 | "Set `hide-ifdef-env' to the define list specified by NAME." |
| 961 | (interactive "SUse define list: ") | 961 | (interactive |
| 962 | (list (completing-read "Use define list: " | ||
| 963 | hide-ifdef-define-alist nil t))) | ||
| 964 | (if (stringp name) (setq name (intern name))) | ||
| 962 | (let ((define-list (assoc name hide-ifdef-define-alist))) | 965 | (let ((define-list (assoc name hide-ifdef-define-alist))) |
| 963 | (if define-list | 966 | (if define-list |
| 964 | (setq hide-ifdef-env | 967 | (setq hide-ifdef-env |