[Emacs-diffs] /srv/bzr/emacs/trunk r101935: gnus-sum.el: Remove long obsoleted functions.

[Katsumi Yamaoka]

------------------------------------------------------------
revno: 101935
author: Lars Magne Ingebrigtsen <address@hidden>
committer: Katsumi Yamaoka <address@hidden>
branch nick: trunk
timestamp: Tue 2010-10-12 14:17:15 +0000
message:
  gnus-sum.el: Remove long obsoleted functions.
modified:
  lisp/gnus/ChangeLog
  lisp/gnus/gnus-kill.el
  lisp/gnus/gnus-sum.el

=== modified file 'lisp/gnus/ChangeLog'
--- a/lisp/gnus/ChangeLog       2010-10-12 00:25:50 +0000
+++ b/lisp/gnus/ChangeLog       2010-10-12 14:17:15 +0000
@@ -1,3 +1,9 @@
+2010-10-12  Lars Magne Ingebrigtsen  <address@hidden>
+
+       * gnus-sum.el (gnus-summary-mark-as-unread-forward)
+       (gnus-summary-mark-as-unread-backward, gnus-summary-mark-as-unread):
+       Remove long obsoleted functions.
+
 2010-10-11  Katsumi Yamaoka  <address@hidden>
 
        * nnimap.el (gnutls-negotiate): Silence the byte compiler.

=== modified file 'lisp/gnus/gnus-kill.el'
--- a/lisp/gnus/gnus-kill.el    2010-09-18 10:02:19 +0000
+++ b/lisp/gnus/gnus-kill.el    2010-10-12 14:17:15 +0000
@@ -480,7 +480,7 @@
         (or (cdr (assq modifier mod-to-header)) "subject")
         pattern
         (if (string-match "m" commands)
-            '(gnus-summary-mark-as-unread nil " ")
+            '(gnus-summary-tick-article nil " ")
           '(gnus-summary-mark-as-read nil "X"))
         nil t))
       (forward-line 1))))

=== modified file 'lisp/gnus/gnus-sum.el'
--- a/lisp/gnus/gnus-sum.el     2010-10-11 23:29:33 +0000
+++ b/lisp/gnus/gnus-sum.el     2010-10-12 14:17:15 +0000
@@ -10853,10 +10853,6 @@
       (gnus-alist-pull article gnus-newsgroup-reads)
       t)))
 
-(defalias 'gnus-summary-mark-as-unread-forward
-  'gnus-summary-tick-article-forward)
-(make-obsolete 'gnus-summary-mark-as-unread-forward
-              'gnus-summary-tick-article-forward "Emacs 20.4")
 (defun gnus-summary-tick-article-forward (n)
   "Tick N articles forwards.
 If N is negative, tick backwards instead.
@@ -10864,18 +10860,12 @@
   (interactive "p")
   (gnus-summary-mark-forward n gnus-ticked-mark))
 
-(defalias 'gnus-summary-mark-as-unread-backward
-  'gnus-summary-tick-article-backward)
-(make-obsolete 'gnus-summary-mark-as-unread-backward
-              'gnus-summary-tick-article-backward "Emacs 20.4")
 (defun gnus-summary-tick-article-backward (n)
   "Tick N articles backwards.
 The difference between N and the number of articles ticked is returned."
   (interactive "p")
   (gnus-summary-mark-forward (- n) gnus-ticked-mark))
 
-(defalias 'gnus-summary-mark-as-unread 'gnus-summary-tick-article)
-(make-obsolete 'gnus-summary-mark-as-unread 'gnus-summary-tick-article "Emacs 
20.4")
 (defun gnus-summary-tick-article (&optional article clear-mark)
   "Mark current article as unread.
 Optional 1st argument ARTICLE specifies article number to be marked as unread.