(auth-source-netrc-parse): Accept a number as the port spec, too.

[gnus] / lisp / gnus-kill.el

diff --git a/lisp/gnus-kill.el b/lisp/gnus-kill.el
index 5483a74..fdbe125 100644 (file)
--- a/lisp/gnus-kill.el
+++ b/lisp/gnus-kill.el
@@ -1,7 +1,6 @@
 ;;; gnus-kill.el --- kill commands for Gnus
 
-;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
-;;   2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+;; Copyright (C) 1995-2011 Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;;     Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -480,7 +479,7 @@ Returns the number of articles marked as read."
         (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))))