aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/emerge.el
diff options
context:
space:
mode:
authorJuanma Barranquero <[email protected]>2007-09-25 11:02:09 +0000
committerJuanma Barranquero <[email protected]>2007-09-25 11:02:09 +0000
commit82af63125cda3637c285499926de9ff590cb7e66 (patch)
tree16059bab1feec4a6dd34616b33ac1e1457d88313 /lisp/emerge.el
parent56eaedfe17651dab1582ef4a460953648eb1089e (diff)
(emerge-really-quit): Use `mapc' rather than `mapcar'.
Diffstat (limited to 'lisp/emerge.el')
-rw-r--r--lisp/emerge.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/emerge.el b/lisp/emerge.el
index 447e45f14f..0c1b3b170c 100644
--- a/lisp/emerge.el
+++ b/lisp/emerge.el
@@ -1886,13 +1886,13 @@ buffer after this will cause serious problems."
(emerge-restore-buffer-characteristics)
;; null out the difference markers so they don't slow down future editing
;; operations
- (mapcar (function (lambda (d)
- (set-marker (aref d 0) nil)
- (set-marker (aref d 1) nil)
- (set-marker (aref d 2) nil)
- (set-marker (aref d 3) nil)
- (set-marker (aref d 4) nil)
- (set-marker (aref d 5) nil)))
+ (mapc (function (lambda (d)
+ (set-marker (aref d 0) nil)
+ (set-marker (aref d 1) nil)
+ (set-marker (aref d 2) nil)
+ (set-marker (aref d 3) nil)
+ (set-marker (aref d 4) nil)
+ (set-marker (aref d 5) nil)))
emerge-difference-list)
;; allow them to be garbage collected
(setq emerge-difference-list nil)