From 043cd0da4651f0501f3e69b7bea040401fc16466 Mon Sep 17 00:00:00 2001
From: Makarius Wenzel
Date: Sun, 17 Sep 2000 11:48:08 +0000
Subject: silent-cmd and init-cmd: activate Isabelle99-1 versions;

---
 isa/isa.el | 13 +++----------
 1 file changed, 3 insertions(+), 10 deletions(-)

diff --git a/isa/isa.el b/isa/isa.el
index 90067fb1..334f91a4 100644
--- a/isa/isa.el
+++ b/isa/isa.el
@@ -113,11 +113,8 @@ and script mode."
    proof-info-command		"ProofGeneral.help();"
    proof-kill-goal-command	"ProofGeneral.kill_goal();"
    proof-find-theorems-command  "ProofGeneral.thms_containing (space_explode \",\" \"%s\");"
-   proof-shell-start-silent-cmd "proofgeneral_disable_pr();"
-   proof-shell-stop-silent-cmd  "proofgeneral_enable_pr();"   
-   ; FIXME improved version for Isabelle99-1:
-   ;   proof-shell-start-silent-cmd "Goals.disable_pr();"
-   ;   proof-shell-stop-silent-cmd  "Goals.enable_pr();"
+   proof-shell-start-silent-cmd "Goals.disable_pr();"
+   proof-shell-stop-silent-cmd  "Goals.enable_pr();"
    ;; command hooks
    proof-goal-command-p		'isa-goal-command-p
    proof-count-undos-fn		'isa-count-undos
@@ -195,11 +192,7 @@ and script mode."
    ;; FIXME: temporary hack for almost enabling/disabling printing.
    ;; Also for setting default values.
    proof-shell-pre-sync-init-cmd	"ProofGeneral.init false;"
-   proof-shell-init-cmd                 (concat 
-					 (proof-assistant-settings-cmd)
- "val pg_saved_gl = ref (!goals_limit); fun proofgeneral_enable_pr () = (goals_limit:= !pg_saved_gl); fun proofgeneral_disable_pr() = (pg_saved_gl := (if (!goals_limit)>0 then !goals_limit else !pg_saved_gl); goals_limit := 0);")
-   ; FIXME improved version for Isabelle99-1:
-   ;proof-shell-init-cmd		 (proof-assistant-settings-cmd)
+   proof-shell-init-cmd		 (proof-assistant-settings-cmd)
 
    proof-shell-restart-cmd		"ProofGeneral.isa_restart();"
    proof-shell-quit-cmd			"quit();"
-- 
cgit v1.2.3