procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(viper-toggle-key, viper-ESC-key): Use mapc' rather than mapcar'.

Browse source
This commit is contained in:
Juanma Barranquero 2007-09-26 00:17:11 +00:00
parent 026056a4c8
commit 60e7e8966b
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lisp/emulation/viper-keym.el
View file

@ -170,7 +170,7 @@ Enter as a sexp. Examples: \"\\C-z\", [(control ?z)]."
(let ((old-value (if (boundp 'viper-toggle-key)
viper-toggle-key
[(control ?z)])))
(mapcar
(mapc
(lambda (buf)
(save-excursion
(set-buffer buf)
@ -210,7 +210,7 @@ If running in a terminal, [(escape)] is not understood, so must use \"\\e\"."
(let ((old-value (if (boundp 'viper-ESC-key)
viper-ESC-key
[(escape)])))
(mapcar
(mapc
(lambda (buf)
(save-excursion
(set-buffer buf)