--- a/src/HOL/Tools/ATP/atp_systems.ML Wed Oct 31 11:23:21 2012 +0100
+++ b/src/HOL/Tools/ATP/atp_systems.ML Wed Oct 31 11:23:21 2012 +0100
@@ -612,8 +612,8 @@
| (NONE, syss) =>
case syss |> filter_out (String.isPrefix "%")
|> filter_out (curry (op =) "") of
- [] => error ("SystemOnTPTP is not available.")
- | [msg] => error ("SystemOnTPTP is not available: " ^ msg ^ ".")
+ [] => error ("SystemOnTPTP is currently not available.")
+ | [msg] => error ("SystemOnTPTP is currently not available: " ^ msg ^ ".")
| syss =>
error ("System " ^ quote name ^ " is not available at SystemOnTPTP.\n" ^
"(Available systems: " ^ commas_quote syss ^ ".)")