diff options
| author | Stefan Monnier | 2018-04-18 15:56:15 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2018-04-18 15:56:15 -0400 |
| commit | 53c29c4d3c636c7f02b563b3c683b13ae5863bcf (patch) | |
| tree | ac476e5eba3eb42ac1ad33f8b944ed02b6d89abb | |
| parent | 403f3d2c85b98a15609b3e52411c175b5294f940 (diff) | |
| download | emacs-53c29c4d3c636c7f02b563b3c683b13ae5863bcf.tar.gz emacs-53c29c4d3c636c7f02b563b3c683b13ae5863bcf.zip | |
* lisp/emacs-lisp/gv.el (gv-define-setter): Silence compiler warning
Code placed in the `gv-expander` property will presumably only be used
when gv is loaded (bug#14529).
| -rw-r--r-- | lisp/emacs-lisp/gv.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/gv.el b/lisp/emacs-lisp/gv.el index 01634d84ca5..6bfc32c8356 100644 --- a/lisp/emacs-lisp/gv.el +++ b/lisp/emacs-lisp/gv.el | |||
| @@ -217,6 +217,8 @@ to be pure and copyable. Example use: | |||
| 217 | (declare (indent 2) (debug (&define name sexp body))) | 217 | (declare (indent 2) (debug (&define name sexp body))) |
| 218 | `(gv-define-expander ,name | 218 | `(gv-define-expander ,name |
| 219 | (lambda (do &rest args) | 219 | (lambda (do &rest args) |
| 220 | (declare-function | ||
| 221 | gv--defsetter "gv" (name setter do args &optional vars)) | ||
| 220 | (gv--defsetter ',name (lambda ,arglist ,@body) do args)))) | 222 | (gv--defsetter ',name (lambda ,arglist ,@body) do args)))) |
| 221 | 223 | ||
| 222 | ;;;###autoload | 224 | ;;;###autoload |