# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1266263751 18000
# Node ID 34e2c3832e08e8fc024cafb103530a2a8188941a
# Parent  7e66e7efd47dfcbd2baaa3a8b261ff0ae83f09c4
(ad-compile-function): Suppress byte-compiler warnings, since it is annoying
for the user to see them each time he runs the code.

diff -r 7e66e7efd47d -r 34e2c3832e08 lisp/ChangeLog
--- a/lisp/ChangeLog	Mon Feb 15 16:04:53 2010 +0100
+++ b/lisp/ChangeLog	Mon Feb 15 14:55:51 2010 -0500
@@ -1,3 +1,9 @@
+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>
 
diff -r 7e66e7efd47d -r 34e2c3832e08 lisp/emacs-lisp/advice.el
--- a/lisp/emacs-lisp/advice.el	Mon Feb 15 16:04:53 2010 +0100
+++ b/lisp/emacs-lisp/advice.el	Mon Feb 15 14:55:51 2010 -0500
@@ -2685,7 +2685,9 @@
       (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))