diff options
| author | Juanma Barranquero | 2007-09-26 00:24:29 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-09-26 00:24:29 +0000 |
| commit | 88f43129a846b261d4144956bcce59d73e75318b (patch) | |
| tree | 6627d95e1aa7d0e14e587389432297edf284ede6 | |
| parent | 65c96997b593ab3cdf79766a0560f09be0b4631e (diff) | |
| download | emacs-88f43129a846b261d4144956bcce59d73e75318b.tar.gz emacs-88f43129a846b261d4144956bcce59d73e75318b.zip | |
(ada-prj-display-page): Use `mapc' rather than `mapcar'.
| -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." | |||
| 254 | (progn | 254 | (progn |
| 255 | (setq widget-field-new nil | 255 | (setq widget-field-new nil |
| 256 | widget-field-list nil) | 256 | widget-field-list nil) |
| 257 | (mapcar (lambda (x) (delete-overlay x)) (car (overlay-lists))) | 257 | (mapc (lambda (x) (delete-overlay x)) (car (overlay-lists))) |
| 258 | (mapcar (lambda (x) (delete-overlay x)) (cdr (overlay-lists))))) | 258 | (mapc (lambda (x) (delete-overlay x)) (cdr (overlay-lists))))) |
| 259 | 259 | ||
| 260 | ;; Display the tabs | 260 | ;; Display the tabs |
| 261 | 261 | ||