diff options
| author | Stefan Monnier | 2009-09-12 01:21:30 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2009-09-12 01:21:30 +0000 |
| commit | bc5e75b6162ea23df8863289de9497617224e9e5 (patch) | |
| tree | 7a5845ea80b8fce020524e7ed8b84ac6e9f5c554 /src | |
| parent | 63255710c117eeff6c231779154810a1c6fceda4 (diff) | |
| download | emacs-bc5e75b6162ea23df8863289de9497617224e9e5.tar.gz emacs-bc5e75b6162ea23df8863289de9497617224e9e5.zip | |
(Fwhere_is_internal): Use nconc2.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 4 | ||||
| -rw-r--r-- | src/keymap.c | 5 |
2 files changed, 5 insertions, 4 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 33e92b33fdb..ff2cce89cb6 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2009-09-12 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * keymap.c (Fwhere_is_internal): Use nconc2. | ||
| 4 | |||
| 1 | 2009-09-11 Alan Mackenzie <acm@muc.de> | 5 | 2009-09-11 Alan Mackenzie <acm@muc.de> |
| 2 | 6 | ||
| 3 | * dispnew.c (Fsend_string_to_terminal): Amend doc string to cover | 7 | * 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. */) | |||
| 2901 | { | 2901 | { |
| 2902 | Lisp_Object seqs = where_is_internal (function, keymaps, | 2902 | Lisp_Object seqs = where_is_internal (function, keymaps, |
| 2903 | !NILP (noindirect), nomenus); | 2903 | !NILP (noindirect), nomenus); |
| 2904 | Lisp_Object args[2]; | 2904 | remapped_sequences = nconc2 (Freverse (seqs), remapped_sequences); |
| 2905 | args[0] = Freverse (seqs); | ||
| 2906 | args[1] = remapped_sequences; | ||
| 2907 | remapped_sequences = Fnconc (2, args); | ||
| 2908 | continue; | 2905 | continue; |
| 2909 | } | 2906 | } |
| 2910 | 2907 | ||