summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPer Abrahamsen <abraham@dina.kvl.dk>1997-06-19 15:31:34 +0000
committerPer Abrahamsen <abraham@dina.kvl.dk>1997-06-19 15:31:34 +0000
commit7ad5ae96022042e06aaf8b0bafdf662031395a81 (patch)
tree7f2358b10e66e5cdc7a3c8dc8128fea2224c73c8
parent4fdbe2605d9f9eb7951358b646ece7839b1ef05d (diff)
downloademacs-7ad5ae96022042e06aaf8b0bafdf662031395a81.tar.gz
Don't delete nil overlays.
-rw-r--r--lisp/wid-edit.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 20e3780a2c3..f5ae7eaef0b 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -815,8 +815,10 @@ button end points."
(children (widget-get widget :children)))
(set-marker from nil)
(set-marker to nil)
- (delete-overlay button)
- (delete-overlay field)
+ (when button
+ (delete-overlay button))
+ (when field
+ (delete-overlay field))
(mapcar 'widget-leave-text children)))
;;; Keymap and Commands.