diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2016-05-18 00:12:01 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2016-05-18 00:49:30 -0700 |
| commit | 639fd22e294fa1702c93531ebb96efb4f3cdffbd (patch) | |
| tree | 8190d9d9fc2f3512d38fa77892ece399040a8b02 /lisp/abbrev.el | |
| parent | ccd5156c42771fc3262fa6b8103dc9d8429898d2 (diff) | |
| download | emacs-639fd22e294fa1702c93531ebb96efb4f3cdffbd.tar.gz | |
Pacify byte-compiler for with-wrapper-hook
* lisp/subr.el (subr--with-wrapper-hook-no-warnings):
New macro, split out from with-wrapper-hook.
* lisp/abbrev.el (abbrev--default-expand):
* lisp/minibuffer.el (completion--in-region):
* lisp/simple.el (buffer-substring--filter):
* lisp/subr.el (with-wrapper-hook):
Use it.
Diffstat (limited to 'lisp/abbrev.el')
| -rw-r--r-- | lisp/abbrev.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/abbrev.el b/lisp/abbrev.el index 7814ea24b4a..163dc8e5727 100644 --- a/lisp/abbrev.el +++ b/lisp/abbrev.el @@ -848,7 +848,7 @@ if expansion occurred, else nil.)" "Default function to use for `abbrev-expand-function'. This respects the wrapper hook `abbrev-expand-functions'. Calls `abbrev-insert' to insert any expansion, and returns what it does." - (with-wrapper-hook abbrev-expand-functions () + (subr--with-wrapper-hook-no-warnings abbrev-expand-functions () (pcase-let ((`(,sym ,name ,wordstart ,wordend) (abbrev--before-point))) (when sym (let ((startpos (copy-marker (point) t)) |