diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-06-08 21:18:31 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-06-08 21:18:31 -0400 |
| commit | 989bc97f04f8143a7ab51088f9861da8d5df45f1 (patch) | |
| tree | d30b2aa74ca9a92bf5d1a347fc89ea00aeab0bd9 /lisp/emacs-lisp/advice.el | |
| parent | 8c6eab5a27df2983c403e6737a4f50d835408d8a (diff) | |
| download | emacs-989bc97f04f8143a7ab51088f9861da8d5df45f1.tar.gz | |
* lisp/emacs-lisp/advice.el (ad-compile-function):
Define warning-suppress-types before we let-bind it.
Fixes: debbugs:6275
Diffstat (limited to 'lisp/emacs-lisp/advice.el')
| -rw-r--r-- | lisp/emacs-lisp/advice.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el index 17f2ed53ba5..9267bc8ac91 100644 --- a/lisp/emacs-lisp/advice.el +++ b/lisp/emacs-lisp/advice.el @@ -2684,6 +2684,8 @@ For that it has to be fbound with a non-autoload definition." ;; because `byte-compile' uses `fset': (ad-with-auto-activation-disabled (require 'bytecomp) + (require 'warnings) ;To define warning-suppress-types + ;before we let-bind it. (let ((symbol (make-symbol "advice-compilation")) (byte-compile-warnings byte-compile-warnings) ;; Don't pop up windows showing byte-compiler warnings. |