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