doc-src/more_antiquote.ML
changeset 38767 d8da44a8dd25
parent 37216 3165bc303f66
child 38917 c7da3cc88135
--- a/doc-src/more_antiquote.ML	Fri Aug 27 00:09:56 2010 +0200
+++ b/doc-src/more_antiquote.ML	Fri Aug 27 12:40:20 2010 +0200
@@ -95,7 +95,7 @@
       |> snd
       |> map_filter (fn (_, (some_thm, proper)) => if proper then some_thm else NONE)
       |> map (holize o no_vars ctxt o AxClass.overload thy);
-  in Thy_Output.output (Thy_Output.maybe_pretty_source (pretty_thm ctxt) src thms) end;
+  in Thy_Output.output ctxt (Thy_Output.maybe_pretty_source pretty_thm ctxt src thms) end;
 
 in