(ad-compile-function): Suppress byte-compiler warnings, since it is annoying

for the user to see them each time he runs the code.

lisp/ChangeLog

+2010-02-15  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* emacs-lisp/advice.el (ad-compile-function): Suppress byte-compiler
+	warnings, since it is annoying for the user to see them each time he
+	runs the code.
+
 2010-02-15  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/tramp.el (tramp-process-actions, tramp-read-passwd):
@@ -5,8 +11,8 @@
 	instead of PROC for caching "first-password-request".  Otherwise,
 	new processes would not profit from passwords already entered.
 
-	* net/tramp-cache.el (tramp-dump-connection-properties): Don't
-	save "first-password-request" property.
+	* net/tramp-cache.el (tramp-dump-connection-properties):
+	Don't save "first-password-request" property.
 
 2010-02-14  Juanma Barranquero  <lekktu@gmail.com>
 

lisp/emacs-lisp/advice.el

@@ -2685,7 +2685,9 @@ For that it has to be fbound with a non-autoload definition."
       (ad-with-auto-activation-disabled
        (require 'bytecomp)
        (let ((symbol (make-symbol "advice-compilation"))
-	     (byte-compile-warnings byte-compile-warnings))
+	     (byte-compile-warnings byte-compile-warnings)
+             ;; Don't pop up windows showing byte-compiler warnings.
+             (warning-suppress-types '(bytecomp)))
 	 (if (featurep 'cl)
 	     (byte-compile-disable-warning 'cl-functions))
 	 (fset symbol (symbol-function function))