diff -r 94e9302a7fd0 -r 48a874444164 src/Pure/ProofGeneral/proof_general_emacs.ML --- a/src/Pure/ProofGeneral/proof_general_emacs.ML Fri Jul 23 18:42:46 2010 +0200 +++ b/src/Pure/ProofGeneral/proof_general_emacs.ML Sat Jul 24 12:14:53 2010 +0200 @@ -137,7 +137,7 @@ val name = thy_name file; val _ = name = "" andalso error ("Bad file name: " ^ quote file); val _ = - if Thy_Info.check_known_thy name then + if Thy_Info.known_thy name then (Isar.>> (Toplevel.commit_exit Position.none); Thy_Info.touch_child_thys name; Thy_Info.register_thy name) handle ERROR msg =>