tuned messages;
authorwenzelm
Sat, 08 Dec 2007 21:41:30 +0100
changeset 25585 19cd3474fdf3
parent 25584 222b91dd754c
child 25586 e4b3bcb150f3
tuned messages;
src/Pure/Isar/isar_syn.ML
--- a/src/Pure/Isar/isar_syn.ML	Sat Dec 08 21:20:07 2007 +0100
+++ b/src/Pure/Isar/isar_syn.ML	Sat Dec 08 21:41:30 2007 +0100
@@ -753,8 +753,8 @@
     (P.position P.string :|-- (fn (str, pos) =>
       (case OuterSyntax.parse pos str of
         [transition] => Scan.succeed (K transition)
-      | _ => Scan.fail_with (K "exactly one nested Isabelle command expected"))
-      handle ERROR msg => Scan.fail_with (K ("malformed nested command\n" ^ msg))));
+      | _ => Scan.fail_with (K "exactly one nested command expected"))
+      handle ERROR msg => Scan.fail_with (K ("malformed command\n" ^ msg))));