[Emacs-diffs] /srv/bzr/emacs/trunk r109076: lisp/bindings.el (top): Use `mapc' instead of `mapcar'.

[Juanma Barranquero]

------------------------------------------------------------
revno: 109076
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Fri 2012-07-13 19:02:18 +0200
message:
  lisp/bindings.el (top): Use `mapc' instead of `mapcar'.
modified:
  lisp/ChangeLog
  lisp/bindings.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-07-13 16:50:21 +0000
+++ b/lisp/ChangeLog    2012-07-13 17:02:18 +0000
@@ -1,5 +1,7 @@
 2012-07-13  Juanma Barranquero  <address@hidden>
 
+       * bindings.el (top): Use `mapc' instead of `mapcar'.
+
        * loadup.el (top): Remove bogus `if' choice (brought by revno:88805).
 
 2012-07-13  Michael Albinus  <address@hidden>

=== modified file 'lisp/bindings.el'
--- a/lisp/bindings.el  2012-07-13 14:25:59 +0000
+++ b/lisp/bindings.el  2012-07-13 17:02:18 +0000
@@ -657,14 +657,14 @@
 ;; For consistency, we give them the `permanent-local' property, even
 ;; though `kill-all-local-variables' does not actually consult it.
 
-(mapcar (lambda (sym) (put sym 'permanent-local t))
-       '(buffer-file-name default-directory buffer-backed-up
-         buffer-saved-size buffer-auto-save-file-name
-         buffer-read-only buffer-undo-list mark-active
-         point-before-scroll buffer-file-truename
-         buffer-file-format buffer-auto-save-file-format
-         buffer-display-count buffer-display-time
-         enable-multibyte-characters))
+(mapc (lambda (sym) (put sym 'permanent-local t))
+      '(buffer-file-name default-directory buffer-backed-up
+       buffer-saved-size buffer-auto-save-file-name
+       buffer-read-only buffer-undo-list mark-active
+       point-before-scroll buffer-file-truename
+       buffer-file-format buffer-auto-save-file-format
+       buffer-display-count buffer-display-time
+       enable-multibyte-characters))
 
 ;; We have base64, md5 and sha1 functions built in now.
 (provide 'base64)