From: Gerd Moellmann <gerd@gnu.org>
Date: Mon, 29 Oct 2001 15:46:27 +0000 (+0000)
Subject: (iso-accents-compose): Push SECOND-CHAR
X-Git-Tag: emacs-21.2~421
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=588a67bc9455a19ab78f6594117ce434613f2309;p=emacs.git

(iso-accents-compose): Push SECOND-CHAR
as is on unread-command-events instead of `(SECOND-CHAR)'.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 90e67f0e4a5..334b2688224 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2001-10-29  Gerd Moellmann  <gerd@gnu.org>
 
+	* international/iso-acc.el (iso-accents-compose): Push SECOND-CHAR
+	as is on unread-command-events instead of `(SECOND-CHAR)'.
+
 	* enriched.el (enriched-face-ans): Handle face attributes
 	of the form `(FACE1 FACE2 ...)'.
 
diff --git a/lisp/international/iso-acc.el b/lisp/international/iso-acc.el
index b265b5815e7..220a6b604f3 100644
--- a/lisp/international/iso-acc.el
+++ b/lisp/international/iso-acc.el
@@ -1,6 +1,6 @@
 ;;; iso-acc.el --- minor mode providing electric accent keys
 
-;; Copyright (C) 1993, 1994, 1996 Free Software Foundation, Inc.
+;; Copyright (C) 1993, 1994, 1996, 2001 Free Software Foundation, Inc.
 
 ;; Author: Johan Vromans
 ;; Maintainer: FSF
@@ -319,7 +319,7 @@ the language you choose)."
 	   entry))
       ;; Otherwise, advance and schedule the second key for execution.
       (setq unread-command-events
-	    (cons (list second-char) unread-command-events))
+	    (push second-char unread-command-events))
       (vector first-char))))
 
 ;; It is a matter of taste if you want the minor mode indicated