1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

(cc-bytecomp-ignore-obsolete): Use byte-compile-disable-warning.

This commit is contained in:
Glenn Morris 2007-10-28 23:50:30 +00:00
parent a7f58f4be2
commit 5e0b2841c7

View file

@ -395,8 +395,8 @@ Don't use within `eval-when-compile'."
(defun cc-bytecomp-ignore-obsolete (form)
;; Wraps a call to `byte-compile-obsolete' that suppresses the warning.
(let ((byte-compile-warnings
(delq 'obsolete (append byte-compile-warnings nil))))
(let ((byte-compile-warnings byte-compile-warnings))
(byte-compile-disable-warning 'obsolete)
(byte-compile-obsolete form)))
(defmacro cc-bytecomp-obsolete-fun (symbol)