[gnus git] branch master updated: m0-11-139-g620476b =1= mm-util.el (mm-with-unibyte-current-buffer): Don't emit a warning

Katsumi <[email protected]> Wed, 04 Feb 2015 23:32:50 +0100
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  620476b499e3385c5689501ba5daf60181fb22d6 (commit)
      from  c7856a2c44ed0da98292631875a51dbd953d7959 (commit)


- Log -----------------------------------------------------------------
commit 620476b499e3385c5689501ba5daf60181fb22d6
Author: Stefan Monnier <[email protected]>
Date:   Wed Feb 4 22:32:33 2015 +0000

    mm-util.el (mm-with-unibyte-current-buffer): Don't emit a warning
    
    We already get an obsolescence message.  Use `declare'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 1bcf8bc..ae4aab9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2015-02-04  Stefan Monnier  <[email protected]>
+
+	* mm-util.el (mm-with-unibyte-current-buffer): Don't emit a warning
+	message, since we already get an obsolescence message.  Use `declare'.
+
 2015-02-04  Eric Abrahamsen  <[email protected]>
 
 	* nnir.el: Revert "Enable non-ASCII IMAP searches".
diff --git a/lisp/mm-util.el b/lisp/mm-util.el
index b2e0ee6..0b75901 100644
--- a/lisp/mm-util.el
+++ b/lisp/mm-util.el
@@ -1241,9 +1241,9 @@ better ways to do a similar thing.  The previous version of this macro
 bound the default value of `enable-multibyte-characters' to nil while
 evaluating FORMS but it is no longer done.  So, some programs assuming
 it if any may malfunction."
+  (declare (obsolete nil "25.1") (indent 0) (debug t))
   (if (featurep 'xemacs)
       `(progn ,@forms)
-    (message "Warning: Using brain-dead macro `mm-with-unibyte-current-buffer'!")
     (let ((multibyte (make-symbol "multibyte")))
       `(let ((,multibyte enable-multibyte-characters))
 	 (when ,multibyte
@@ -1252,9 +1252,6 @@ it if any may malfunction."
 	     (progn ,@forms)
 	   (when ,multibyte
 	     (set-buffer-multibyte t)))))))
-(put 'mm-with-unibyte-current-buffer 'lisp-indent-function 0)
-(put 'mm-with-unibyte-current-buffer 'edebug-form-spec '(body))
-(make-obsolete 'mm-with-unibyte-current-buffer nil "25.1")
 
 (defun mm-find-charset-region (b e)
   "Return a list of Emacs charsets in the region B to E."

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog  |    5 +++++
 lisp/mm-util.el |    5 +----
 2 files changed, 6 insertions(+), 4 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project