diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 9abd2475e6b..8a1d9a33ef3 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2009-01-10  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+	* gnus-sum.el (gnus-summary-next-article): Revert last change by which
+	XEmacs gets not to work.
+
 2009-01-09  Glenn Morris  <rgm@gnu.org>
 
 	* gnus-sum.el (gnus-summary-next-article): Replace last-command-char
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 19da9852243..ed636e03229 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7625,7 +7625,7 @@ If BACKWARD, the previous article is selected instead of the next."
    (t
     (unless (gnus-ephemeral-group-p gnus-newsgroup-name)
       (gnus-summary-jump-to-group gnus-newsgroup-name))
-    (let ((cmd last-command-event)
+    (let ((cmd last-command-char)
 	  (point
 	   (with-current-buffer gnus-group-buffer
 	     (point)))