--- a/src/Pure/ProofGeneral/proof_general_emacs.ML Wed Aug 13 20:57:33 2008 +0200
+++ b/src/Pure/ProofGeneral/proof_general_emacs.ML Wed Aug 13 20:57:35 2008 +0200
@@ -188,7 +188,7 @@
in
fun setup_present_hook () =
- Present.add_hook (fn _ => fn res => tell_thm_deps (maps #2 res));
+ ProofDisplay.add_hook (fn res => tell_thm_deps (maps #2 res));
end;
--- a/src/Pure/ProofGeneral/proof_general_pgip.ML Wed Aug 13 20:57:33 2008 +0200
+++ b/src/Pure/ProofGeneral/proof_general_pgip.ML Wed Aug 13 20:57:35 2008 +0200
@@ -353,7 +353,7 @@
in
fun setup_present_hook () =
- Present.add_hook (fn _ => fn res => tell_thm_deps (maps #2 res));
+ ProofDisplay.add_hook (fn res => tell_thm_deps (maps #2 res));
end;