mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-28 07:45:00 +00:00
Code Issues Releases Activity

Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-702

Browse Source 
Merge from gnus--rel--5.10

Patches applied:

 * gnus--rel--5.10  (patch 185-186)

   - Merge from emacs--cvs-trunk--0
   - Update from CVS

2006-01-16  Katsumi Yamaoka  <yamaoka@jpl.org>

   * lisp/gnus/nnrss.el: Update copyright.
   (nnrss-opml-import): Query whether to subscribe to each entry.

   * lisp/gnus/gnus-art.el:
   * lisp/gnus/gnus-cus.el:
   * lisp/gnus/gnus-group.el:
   * lisp/gnus/gnus-start.el:
   * lisp/gnus/gnus-sum.el:
   * lisp/gnus/mm-uu.el:
   * lisp/gnus/mm-view.el: Update copyright.

2006-01-16  Reiner Steib  <Reiner.Steib@gmx.de>

   * lisp/gnus/message.el (message-info): New function.
   (message-mode-menu): Add it.
   Update copyright.

   * lisp/gnus/ChangeLog: Fix and update copyright.

2006-01-16  Katsumi Yamaoka  <yamaoka@jpl.org>

   * man/gnus.texi: Update copyright.
This commit is contained in:
Miles Bader 2006-01-17 02:39:39 +00:00
parent d247d0fe89
commit c428866987
12 changed files with 73 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
lisp/gnus/ChangeLog
View File

@ -1,3 +1,24 @@
2006-01-16 Katsumi Yamaoka <yamaoka@jpl.org>
* nnrss.el: Update copyright.
(nnrss-opml-import): Query whether to subscribe to each entry.
* gnus-art.el:
* gnus-cus.el:
* gnus-group.el:
* gnus-start.el:
* gnus-sum.el:
* mm-uu.el:
* mm-view.el: Update copyright.
2006-01-16 Reiner Steib <Reiner.Steib@gmx.de>
* message.el (message-info): New function.
(message-mode-menu): Add it.
Update copyright.
* ChangeLog: Fix and update copyright.
2006-01-16 Katsumi Yamaoka <yamaoka@jpl.org>
* mm-uu.el (mm-uu-text-plain-type): New variable.
@ -53,12 +74,6 @@
RFC822 style. Suggested by Mark Plaksin <happy@mcplaksin.org>.
(nnrss-check-group): Use it.
2006-01-03 Rodrigo Ventura <yoda@isr.ist.utl.pt> (tiny change)
* gnus-xmas.el (gnus-xmas-group-startup-message): Typo
gnus-splash-face -> gnus-splash. Fixes starting from a TTY in
XEmacs.
2006-01-01 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus-sum.el (gnus-summary-work-articles): Remove useless `min'.
@ -3274,7 +3289,7 @@
See ChangeLog.2 for earlier changes.
Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
Copyright (C) 2004, 2005, 2006 Free Software Foundation, Inc.
Copying and distribution of this file, with or without modification,
are permitted provided the copyright notice and this notice are preserved.

2
lisp/gnus/gnus-art.el
View File

@ -1,7 +1,7 @@
;;; gnus-art.el --- article mode commands for Gnus
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news

2
lisp/gnus/gnus-cus.el
View File

@ -1,7 +1,7 @@
;;; gnus-cus.el --- customization commands for Gnus
;; Copyright (C) 1996, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Per Abrahamsen <abraham@dina.kvl.dk>
;; Keywords: news

2
lisp/gnus/gnus-group.el
View File

@ -1,7 +1,7 @@
;;; gnus-group.el --- group mode commands for Gnus
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news

2
lisp/gnus/gnus-start.el
View File

@ -1,7 +1,7 @@
;;; gnus-start.el --- startup functions for Gnus
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news

2
lisp/gnus/gnus-sum.el
View File

@ -1,7 +1,7 @@
;;; gnus-sum.el --- summary mode commands for Gnus
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: news

17
lisp/gnus/message.el
View File

@ -1,7 +1,7 @@
;;; message.el --- composing mail and news messages
;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; Keywords: mail, news
@ -2185,6 +2185,15 @@ Point is left at the beginning of the narrowed-to region."
(1+ max)))))
(message-sort-headers-1))))
(defun message-info (&optional arg)
"Display the Message manual.
Prefixed with one \\[universal-argument], display the Emacs MIME manual.
Prefixed with two \\[universal-argument]'s, display the PGG manual."
(interactive "p")
(cond ((eq arg 16) (Info-goto-node "(pgg)Top"))
((eq arg 4) (Info-goto-node "(emacs-mime)Top"))
(t (Info-goto-node "(message)Top"))))
@ -2312,7 +2321,11 @@ Point is left at the beginning of the narrowed-to region."
'(:help "Ask, then arrange to send message at that time"))]
["Kill Message" message-kill-buffer
,@(if (featurep 'xemacs) '(t)
'(:help "Delete this message without sending"))]))
'(:help "Delete this message without sending"))]
"----"
["Message manual" message-info
,@(if (featurep 'xemacs) '(t)
'(:help "Display the Message manual"))]))
(easy-menu-define
message-mode-field-menu message-mode-map ""

2
lisp/gnus/mm-uu.el
View File

@ -1,7 +1,7 @@
;;; mm-uu.el --- Return uu stuff as mm handles
;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Shenghuo Zhu <zsh@cs.rochester.edu>
;; Keywords: postscript uudecode binhex shar forward gnatsweb pgp

2
lisp/gnus/mm-view.el
View File

@ -1,7 +1,7 @@
;;; mm-view.el --- functions for viewing MIME objects
;; Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
;; 2005 Free Software Foundation, Inc.
;; 2005, 2006 Free Software Foundation, Inc.
;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
;; This file is part of GNU Emacs.

32
lisp/gnus/nnrss.el
View File

@ -1,6 +1,7 @@
;;; nnrss.el --- interfacing with RSS
;; Copyright (C) 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
;; Copyright (C) 2001, 2002, 2003, 2004, 2005,
;; 2006 Free Software Foundation, Inc.
;; Author: Shenghuo Zhu <zsh@cs.rochester.edu>
;; Keywords: RSS
@ -755,14 +756,29 @@ which RSS 2.0 allows."
"OPML subscriptions import.
Read the file and attempt to subscribe to each Feed in the file."
(interactive "fImport file: ")
(mapcar
(lambda (node) (gnus-group-make-rss-group
(cdr (assq 'xmlUrl (cadr node)))))
(nnrss-find-el 'outline
(mapc
(lambda (node)
(let ((xmlurl (cdr (assq 'xmlUrl (cadr node)))))
(when (and xmlurl
(not (string-match "\\`[\t ]*\\'" xmlurl))
(prog1
(y-or-n-p (format "Subscribe to %s " xmlurl))
(message "")))
(condition-case err
(progn
(find-file opml-file)
(xml-parse-region (point-min)
(point-max))))))
(gnus-group-make-rss-group xmlurl)
(forward-line 1))
(error
(message
"Failed to subscribe to %s (%s); type any key to continue: "
xmlurl
(error-message-string err))
(let ((echo-keystrokes 0))
(read-char)))))))
(nnrss-find-el 'outline
(mm-with-multibyte-buffer
(insert-file-contents opml-file)
(xml-parse-region (point-min) (point-max))))))
(defun nnrss-opml-export ()
"OPML subscription export.

4
man/ChangeLog
View File

@ -1,3 +1,7 @@
2006-01-16 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus.texi: Update copyright.
2006-01-16 Juri Linkov <juri@jurta.org>
* display.texi (Standard Faces): Add `mode-line-buffer-id'.

2
man/gnus.texi
View File

@ -8,7 +8,7 @@
@copying
Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001,
2002, 2003, 2004, 2005 Free Software Foundation, Inc.
2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
@quotation
Permission is granted to copy, distribute and/or modify this document