From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 12 Sep 2009 01:21:30 +0000 (+0000)
Subject: (Fwhere_is_internal): Use nconc2.
X-Git-Tag: emacs-pretest-23.1.90~1363
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bc5e75b6162ea23df8863289de9497617224e9e5;p=emacs.git

(Fwhere_is_internal): Use nconc2.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 33e92b33fdb..ff2cce89cb6 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-09-12  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* keymap.c (Fwhere_is_internal): Use nconc2.
+
 2009-09-11  Alan Mackenzie  <acm@muc.de>
 
 	* dispnew.c (Fsend_string_to_terminal): Amend doc string to cover
diff --git a/src/keymap.c b/src/keymap.c
index bcbeda72c8c..e4f68d386de 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -2901,10 +2901,7 @@ remapped command in the returned list.  */)
 	{
 	  Lisp_Object seqs = where_is_internal (function, keymaps,
 						!NILP (noindirect), nomenus);
-	  Lisp_Object args[2];
-	  args[0] = Freverse (seqs);
-	  args[1] = remapped_sequences;
-	  remapped_sequences = Fnconc (2, args);
+	  remapped_sequences = nconc2 (Freverse (seqs), remapped_sequences);
 	  continue;
 	}