[Emacs-diffs] Changes to emacs/lisp/gnus/nnheader.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/03/12 19:07:16

Index: nnheader.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/gnus/nnheader.el,v
retrieving revision 1.36
retrieving revision 1.37
diff -u -b -r1.36 -r1.37
--- nnheader.el 8 Jan 2008 20:45:19 -0000       1.36
+++ nnheader.el 12 Mar 2008 19:07:16 -0000      1.37
@@ -572,10 +572,9 @@
 
 (defun nnheader-init-server-buffer ()
   "Initialize the Gnus-backend communication buffer."
-  (save-excursion
     (unless (gnus-buffer-live-p nntp-server-buffer)
       (setq nntp-server-buffer (get-buffer-create " *nntpd*")))
-    (set-buffer nntp-server-buffer)
+  (with-current-buffer nntp-server-buffer
     (mm-enable-multibyte)
     (erase-buffer)
     (kill-all-local-variables)
@@ -1060,7 +1059,6 @@
 
 (defalias 'nnheader-cancel-timer 'cancel-timer)
 (defalias 'nnheader-cancel-function-timers 'cancel-function-timers)
-(defalias 'nnheader-string-as-multibyte 'string-as-multibyte)
 
 (defun nnheader-accept-process-output (process)
   (accept-process-output
@@ -1077,5 +1075,5 @@
 
 (provide 'nnheader)
 
-;;; arch-tag: a9c4b7d9-52ae-4ec9-b196-dfd93124d202
+;; arch-tag: a9c4b7d9-52ae-4ec9-b196-dfd93124d202
 ;;; nnheader.el ends here