aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2007-09-21 08:05:42 +0000
committerGlenn Morris2007-09-21 08:05:42 +0000
commit1eff4ba396eebeb2e28077869fa30df4e0d53f73 (patch)
tree8265d8085bf7cdcc4f4dc4857889c875489acbbf
parent8cea6fdf00c289da3debf31f5d0d95497b0b1ed8 (diff)
downloademacs-1eff4ba396eebeb2e28077869fa30df4e0d53f73.tar.gz
emacs-1eff4ba396eebeb2e28077869fa30df4e0d53f73.zip
(f90-mode-abbrev-table): Use mapc rather than mapcar.
-rw-r--r--lisp/progmodes/f90.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el
index 6c704916c65..c7042fb1f67 100644
--- a/lisp/progmodes/f90.el
+++ b/lisp/progmodes/f90.el
@@ -682,7 +682,7 @@ Used in the F90 entry in `hs-special-modes-alist'.")
682(let (abbrevs-changed) 682(let (abbrevs-changed)
683 ;; Use the 6th arg (SYSTEM-FLAG) of define-abbrev if possible. 683 ;; Use the 6th arg (SYSTEM-FLAG) of define-abbrev if possible.
684 ;; A little baroque to quieten the byte-compiler. 684 ;; A little baroque to quieten the byte-compiler.
685 (mapcar 685 (mapc
686 (function (lambda (element) 686 (function (lambda (element)
687 (condition-case nil 687 (condition-case nil
688 (apply 'define-abbrev f90-mode-abbrev-table 688 (apply 'define-abbrev f90-mode-abbrev-table