1.1 --- a/doc-src/antiquote_setup.ML Mon Mar 24 18:44:21 2008 +0100
1.2 +++ b/doc-src/antiquote_setup.ML Mon Mar 24 23:34:24 2008 +0100
1.3 @@ -36,7 +36,7 @@
1.4 else txt1 ^ ": " ^ txt2;
1.5 val txt' = if kind = "" then txt else kind ^ " " ^ txt;
1.6 val _ = writeln (ml (txt1, txt2));
1.7 - val _ = ML_Context.use_mltext (ml (txt1, txt2)) false (SOME (Context.Proof ctxt));
1.8 + val _ = ML_Context.use_mltext false Position.none (ml (txt1, txt2)) (SOME (Context.Proof ctxt));
1.9 in
1.10 "\\indexml" ^ kind ^ enclose "{" "}"
1.11 (translate_string (fn "_" => "-" | ">" => "$>$" | "#" => "\\#" | c => c) txt1) ^