(gnus-article-read-summary-keys): Don't call disabled commands.

[gnus] / lisp / nnheader.el

diff --git a/lisp/nnheader.el b/lisp/nnheader.el
index d34229a..1c7990b 100644 (file)
--- a/lisp/nnheader.el
+++ b/lisp/nnheader.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 1987, 1988, 1989, 1990, 1993, 1994,
 ;;   1995, 1996, 1997, 1998, 2000, 2001, 2002, 2003,
-;;   2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+;;   2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc.
 
 ;; Author: Masanobu UMEDA <umerin@flab.flab.fujitsu.junet>
 ;;     Lars Magne Ingebrigtsen <larsi@gnus.org>
@@ -1089,12 +1089,12 @@ See `find-file-noselect' for the arguments."
               mark
               (cond
                ((eq what 'add)
-                (gnus-range-add (cdr (assoc mark backend-marks)) range)
-                ((eq what 'del)
-                 (gnus-remove-from-range
-                  (cdr (assoc mark backend-marks)) range))
-                ((eq what 'set)
-                 range)))
+                (gnus-range-add (cdr (assoc mark backend-marks)) range))
+               ((eq what 'del)
+                (gnus-remove-from-range
+                 (cdr (assoc mark backend-marks)) range))
+               ((eq what 'set)
+                range))
               backend-marks)))))
   backend-marks)