diff options
| author |  David Aspinall <da@inf.ed.ac.uk> | 2002-07-01 00:30:12 +0000 |
|---|---|---|
| committer | David Aspinall <da@inf.ed.ac.uk> | 2002-07-01 00:30:12 +0000 |
| commit | 40aba9efe1f037abe9f8e31361865959647df8fe (patch) | |
| tree | dda7976ed0bb41fb48521b303a10378271845228 | |
| parent | a17aef71ab2da5584baa70490aec75486e054dae (diff) | |
proof-restart: also remove idiom internal spans.
| -rw-r--r-- | generic/proof-script.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/proof-script.el b/generic/proof-script.el index 003ceab4..8d4c6ba6 100644 --- a/generic/proof-script.el +++ b/generic/proof-script.el @@ -2256,7 +2256,8 @@ will deactivated." (with-current-buffer buffer (if proof-active-buffer-fake-minor-mode (setq proof-active-buffer-fake-minor-mode nil)) - (delete-spans (point-min) (point-max) 'type) ;; remove spans + (delete-spans (point-min) (point-max) 'type) ; remove top-level spans + (delete-spans (point-min) (point-max) 'idiom) ; and embedded spans (setq pg-script-portions nil) ;; also the record of them (proof-detach-segments buffer) ;; detach queue and locked (proof-init-segmentation))) |