changeset 30358 | f7fea73b97a6 |
parent 30242 | aea5d7fa7ef5 |
child 30365 | 790129514c2d |
1.1 --- a/doc-src/antiquote_setup.ML Sun Mar 08 12:16:12 2009 +0100 1.2 +++ b/doc-src/antiquote_setup.ML Sun Mar 08 15:01:10 2009 +0100 1.3 @@ -67,7 +67,6 @@ 1.4 else if kind = "exception" then txt1 ^ " of " ^ txt2 1.5 else txt1 ^ ": " ^ txt2; 1.6 val txt' = if kind = "" then txt else kind ^ " " ^ txt; 1.7 - val _ = writeln (ml (txt1, txt2)); 1.8 val _ = ML_Context.eval_in (SOME ctxt) false Position.none (ml (txt1, txt2)); 1.9 val kind' = if kind = "" then "ML" else "ML " ^ kind; 1.10 in