--- a/src/Pure/ProofGeneral/proof_general_pgip.ML Mon Jul 14 11:19:41 2008 +0200
+++ b/src/Pure/ProofGeneral/proof_general_pgip.ML Mon Jul 14 11:19:42 2008 +0200
@@ -429,7 +429,7 @@
fun isarcmd s = Isar.>>> (OuterSyntax.parse Position.none s);
(* TODO:
- - apply a command given a transition function, e.g. IsarCmd.undo.
+ - apply a command given a transition function;
- fix position from path of currently open file [line numbers risk garbling though].
*)
@@ -549,7 +549,7 @@
isarcmd ("undos_proof " ^ Int.toString times)
end
-fun redostep _ = isarcmd "redo"
+fun redostep _ = sys_error "redo unavailable"
fun abortgoal _ = isarcmd "kill" (* was: ProofGeneral.kill_proof *)