diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2007-09-26 00:24:29 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2007-09-26 00:24:29 +0000 |
| commit | 88f43129a846b261d4144956bcce59d73e75318b (patch) | |
| tree | 6627d95e1aa7d0e14e587389432297edf284ede6 /lisp/progmodes/ada-prj.el | |
| parent | 65c96997b593ab3cdf79766a0560f09be0b4631e (diff) | |
| download | emacs-88f43129a846b261d4144956bcce59d73e75318b.tar.gz | |
(ada-prj-display-page): Use `mapc' rather than `mapcar'.
Diffstat (limited to 'lisp/progmodes/ada-prj.el')
| -rw-r--r-- | lisp/progmodes/ada-prj.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/progmodes/ada-prj.el b/lisp/progmodes/ada-prj.el index 7cff0158f8a..b3f059b2b34 100644 --- a/lisp/progmodes/ada-prj.el +++ b/lisp/progmodes/ada-prj.el @@ -254,8 +254,8 @@ The current buffer must be the project editing buffer." (progn (setq widget-field-new nil widget-field-list nil) - (mapcar (lambda (x) (delete-overlay x)) (car (overlay-lists))) - (mapcar (lambda (x) (delete-overlay x)) (cdr (overlay-lists))))) + (mapc (lambda (x) (delete-overlay x)) (car (overlay-lists))) + (mapc (lambda (x) (delete-overlay x)) (cdr (overlay-lists))))) ;; Display the tabs |