--- a/src/Pure/Isar/isar_output.ML Thu Jun 02 18:29:53 2005 +0200
+++ b/src/Pure/Isar/isar_output.ML Thu Jun 02 18:29:54 2005 +0200
@@ -37,8 +37,6 @@
structure T = OuterLex;
structure P = OuterParse;
-
-
(** global references -- defaults for options **)
val locale = ref "";
@@ -168,7 +166,7 @@
let val (opts, src) = antiq_args lex x in
options opts (fn () => command src state) (); (*preview errors!*)
Library.setmp print_mode (! modes @ Latex.modes @ ! print_mode)
- (options opts (fn () => command src state)) ()
+ (Output.no_warnings (options opts (fn () => command src state))) ()
end;
val ants = Antiquote.antiquotes_of (str, pos);
in