src/Pure/ProofGeneral/proof_general_emacs.ML
changeset 26613 725a3d9011d1
parent 26607 e36d16985402
child 26643 99f5407c05ef
equal deleted inserted replaced
26612:f9c3c2110b03 26613:725a3d9011d1
   165     List.app tell_file_retracted (ThyInfo.loaded_files name)
   165     List.app tell_file_retracted (ThyInfo.loaded_files name)
   166   else ();
   166   else ();
   167 
   167 
   168 in
   168 in
   169   fun setup_thy_loader () = ThyInfo.add_hook trace_action;
   169   fun setup_thy_loader () = ThyInfo.add_hook trace_action;
   170   fun sync_thy_loader () = List.app (trace_action ThyInfo.Update) (ThyInfo.names ());
   170   fun sync_thy_loader () = List.app (trace_action ThyInfo.Update) (ThyInfo.get_names ());
   171 end;
   171 end;
   172 
   172 
   173 
   173 
   174 (* get informed about files *)
   174 (* get informed about files *)
   175 
   175