# HG changeset patch
# User Eric S. Raymond <esr@snark.thyrsus.com>
# Date 733768914 0
# Node ID 5c9d9b33f249eee5419cf051d5f9c62a4864b09a
# Parent  a149f1464f40569ae22d7ec4c9b323b22b261de0
(repeat-history-command): Bug fix.  Someone forgot a car.

diff -r a149f1464f40 -r 5c9d9b33f249 lisp/chistory.el
--- a/lisp/chistory.el	Fri Apr 02 08:12:40 1993 +0000
+++ b/lisp/chistory.el	Fri Apr 02 16:41:54 1993 +0000
@@ -151,7 +151,7 @@
 		(beginning-of-line)
 		(read (current-buffer)))
 	    (set-buffer
-	     (cdr (buffer-list)))))))
+	     (car (cdr (buffer-list))))))))
 
 ;;;###autoload
 (defun command-history-mode ()