diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-07 19:04:18 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-07 19:04:18 -0500 |
| commit | c4f49d7609f63d6a8d7a57c7fc6cd14d9b0b9ab0 (patch) | |
| tree | d830e74094aadd746088d07478cc0c88da0c206a /lisp/skeleton.el | |
| parent | 26bfd0cdcf8bdf4569608227c527bebd755ef2e6 (diff) | |
| download | emacs-c4f49d7609f63d6a8d7a57c7fc6cd14d9b0b9ab0.tar.gz emacs-c4f49d7609f63d6a8d7a57c7fc6cd14d9b0b9ab0.tar.bz2 emacs-c4f49d7609f63d6a8d7a57c7fc6cd14d9b0b9ab0.zip | |
* lisp/skeleton.el (skeleton-read): Silence compiler warning
Diffstat (limited to 'lisp/skeleton.el')
| -rw-r--r-- | lisp/skeleton.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/skeleton.el b/lisp/skeleton.el index 8a50fbef643..c363fb2c489 100644 --- a/lisp/skeleton.el +++ b/lisp/skeleton.el @@ -290,7 +290,8 @@ i.e. we are handling the iterator of a subskeleton, returns empty string if user didn't modify input. While reading, the value of `minibuffer-help-form' is variable `help' if that is non-nil or a default string." - (let ((minibuffer-help-form (or (if (boundp 'help) (symbol-value 'help)) + (with-suppressed-warnings ((lexical help)) (defvar help)) ;FIXME: Prefix! + (let ((minibuffer-help-form (or (bound-and-true-p help) (if recursive "\ As long as you provide input you will insert another subskeleton. |