# HG changeset patch # User Glenn Morris # Date 1193615430 0 # Node ID e177256e1ca2c2831c8aaf1afa60ff3342416c0e # Parent c717580e78174a225ad6a55081192c3269626db1 (cc-bytecomp-ignore-obsolete): Use byte-compile-disable-warning. diff -r c717580e7817 -r e177256e1ca2 lisp/progmodes/cc-bytecomp.el --- a/lisp/progmodes/cc-bytecomp.el Sun Oct 28 17:39:49 2007 +0000 +++ b/lisp/progmodes/cc-bytecomp.el Sun Oct 28 23:50:30 2007 +0000 @@ -395,8 +395,8 @@ (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)