changeset 68877 | 33d78e5e0a00 |
parent 68874 | cca5ca811714 |
child 68884 | 9b97d0b20d95 |
--- a/src/Pure/PIDE/command.ML Sun Sep 02 14:14:43 2018 +0200 +++ b/src/Pure/PIDE/command.ML Sun Sep 02 14:56:26 2018 +0200 @@ -193,6 +193,10 @@ val res = if Keyword.is_theory_body keywords name then Toplevel.reset_theory st0 else if Keyword.is_proof keywords name then Toplevel.reset_proof st0 + else if Keyword.is_theory_end keywords name then + (case Toplevel.reset_notepad st0 of + NONE => Toplevel.reset_theory st0 + | some => some) else NONE; in (case res of