From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Tue, 28 Apr 2009 18:58:33 +0000 (+0000)
Subject: (quail-vunion): Remove unexplained nreverse.
X-Git-Tag: emacs-pretest-23.0.93~34
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=afa13c4ab24f3a811fe6473cd1b525d61da18d80;p=emacs.git

(quail-vunion): Remove unexplained nreverse.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5b2ea844137..009225a97f0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2009-04-28  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* international/quail.el (quail-vunion): Remove unexplained nreverse.
+
 2009-04-28  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/gdb-ui.el (gdb-tooltip-print): Avoid "Non-X frame used"
@@ -61,8 +65,8 @@
 
 2009-04-18  ARISAWA Akihiro  <ari@mbf.ocn.ne.jp>
 
-	* epa-file.el (epa-file-decode-and-insert): Use
-	string-to-multibyte instead of set-buffer-multibyte.
+	* epa-file.el (epa-file-decode-and-insert):
+	Use string-to-multibyte instead of set-buffer-multibyte.
 	<http://sourceforge.jp/ticket/browse.php?group_id=2267&tid=15259>
 
 2009-04-18  Yann Hodique  <yann.hodique@gmail.com>  (tiny change)
@@ -71,8 +75,8 @@
 
 2009-04-18  Chong Yidong  <cyd@stupidchicken.com>
 
-	* thingatpt.el (thing-at-point-bounds-of-list-at-point): New
-	function (Bug#3027).
+	* thingatpt.el (thing-at-point-bounds-of-list-at-point):
+	New function (Bug#3027).
 
 2009-04-17  Kenichi Handa  <handa@m17n.org>
 
@@ -82,8 +86,8 @@
 
 	* textmodes/flyspell.el (flyspell-correct-word-before-point):
 	Don't create markers.
-	(tex-mode-flyspell-verify): Don't create markers.  Use
-	line-end-position.
+	(tex-mode-flyspell-verify): Don't create markers.
+	Use line-end-position.
 	(sgml-mode-flyspell-verify): Don't create markers.  Simplify code
 	using looking-at and looking-back.
 
@@ -119,9 +123,8 @@
 
 2009-04-15  Dan Nicolaescu  <dann@ics.uci.edu>
 
-	* vc-svn.el (vc-svn-after-dir-status): Fix regexp to allow for
-	file names with leading spaces.  Ignore "." if it appears as a
-	filename.
+	* vc-svn.el (vc-svn-after-dir-status): Fix regexp to allow for file
+	names with leading spaces.  Ignore "." if it appears as a filename.
 
 2009-04-14  Juanma Barranquero  <lekktu@gmail.com>
 
@@ -149,7 +152,7 @@
 	* minibuffer.el (completion--try-word-completion): Don't disable
 	`partial-completion' any more.  Mark the added char instead.
 	(completion-pcm--string->pattern): Notice chars added by
-	completion--try-word-completion and treat them specially.
+	completion--try-word-completion and treat them specially. (bug#2957)
 
 2009-04-13  Jason Rumney  <jasonr@gnu.org>
 
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index e0be69262b3..f70b5c1cfc0 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -1091,7 +1091,10 @@ to the current translations for KEY instead of replacing them."
 
 (defun quail-vunion (v1 v2)
   (apply 'vector
-         (nreverse (delete-dups (nconc (append v1 ()) (append v2 ()))))))
+         ;; No idea why this was here, but it seems to cause the
+         ;; incorrect ordering, according to Nils Anders Danielsson.
+         ;; (nreverse
+         (delete-dups (nconc (append v1 ()) (append v2 ()))))) ;; )
 
 ;;;###autoload
 (defun quail-defrule-internal (key trans map &optional append decode-map props)