diff options
author | Per Abrahamsen <abraham@dina.kvl.dk> | 1997-06-19 15:31:34 +0000 |
---|---|---|
committer | Per Abrahamsen <abraham@dina.kvl.dk> | 1997-06-19 15:31:34 +0000 |
commit | 7ad5ae96022042e06aaf8b0bafdf662031395a81 (patch) | |
tree | 7f2358b10e66e5cdc7a3c8dc8128fea2224c73c8 | |
parent | 4fdbe2605d9f9eb7951358b646ece7839b1ef05d (diff) | |
download | emacs-7ad5ae96022042e06aaf8b0bafdf662031395a81.tar.gz |
Don't delete nil overlays.
-rw-r--r-- | lisp/wid-edit.el | 6 |
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. |