[Emacs-diffs] Changes to emacs/lisp/gnus/webmail.el [gnus-5_10-branch]

[Reiner Steib]

Index: emacs/lisp/gnus/webmail.el
diff -c emacs/lisp/gnus/webmail.el:1.4.2.1 emacs/lisp/gnus/webmail.el:1.4.2.2
*** emacs/lisp/gnus/webmail.el:1.4.2.1  Thu Jul 22 16:45:51 2004
--- emacs/lisp/gnus/webmail.el  Tue Aug 31 14:47:58 2004
***************
*** 1,5 ****
  ;;; webmail.el --- interface of web mail
! ;; Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
  
  ;; Author: Shenghuo Zhu <address@hidden>
  ;; Keywords: hotmail netaddress my-deja netscape
--- 1,5 ----
  ;;; webmail.el --- interface of web mail
! ;; Copyright (C) 1999, 2000, 2001, 2004 Free Software Foundation, Inc.
  
  ;; Author: Shenghuo Zhu <address@hidden>
  ;; Keywords: hotmail netaddress my-deja netscape
***************
*** 196,202 ****
      (insert "\n---------------- A bug at " str " ------------------\n")
      (mapcar #'(lambda (sym)
                (if (boundp sym)
!                   (pp `(setq ,sym ',(eval sym)) (current-buffer))))
            '(webmail-type user))
      (insert "---------------- webmail buffer ------------------\n\n")
      (insert-buffer-substring webmail-buffer)
--- 196,202 ----
      (insert "\n---------------- A bug at " str " ------------------\n")
      (mapcar #'(lambda (sym)
                (if (boundp sym)
!                   (gnus-pp `(setq ,sym ',(eval sym)))))
            '(webmail-type user))
      (insert "---------------- webmail buffer ------------------\n\n")
      (insert-buffer-substring webmail-buffer)