diff options
| author | Luc Teirlinck | 2003-10-26 00:57:12 +0000 |
|---|---|---|
| committer | Luc Teirlinck | 2003-10-26 00:57:12 +0000 |
| commit | 7d9d1ab638d1fa64ea044618cef7b2c9598bbe3d (patch) | |
| tree | a881cacf6c1edc3be7ed1a48b23d63be9053bbb7 | |
| parent | ca448425e9dd04d345533d25dd4e7d895ab7b455 (diff) | |
| download | emacs-7d9d1ab638d1fa64ea044618cef7b2c9598bbe3d.tar.gz emacs-7d9d1ab638d1fa64ea044618cef7b2c9598bbe3d.zip | |
(widget-default-delete): Always delete child widgets. (From Per
Abrahamsen.)
| -rw-r--r-- | lisp/wid-edit.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index 07bb0c1f0c2..4c70334e908 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el | |||
| @@ -1465,6 +1465,7 @@ If that does not exists, call the value of `widget-complete-field'." | |||
| 1465 | (inhibit-modification-hooks t) | 1465 | (inhibit-modification-hooks t) |
| 1466 | (inhibit-read-only t)) | 1466 | (inhibit-read-only t)) |
| 1467 | (widget-apply widget :value-delete) | 1467 | (widget-apply widget :value-delete) |
| 1468 | (widget-children-value-delete widget) | ||
| 1468 | (when inactive-overlay | 1469 | (when inactive-overlay |
| 1469 | (delete-overlay inactive-overlay)) | 1470 | (delete-overlay inactive-overlay)) |
| 1470 | (when button-overlay | 1471 | (when button-overlay |