1.1 --- a/doc-src/more_antiquote.ML	Fri Aug 27 00:09:56 2010 +0200
     1.2 +++ b/doc-src/more_antiquote.ML	Fri Aug 27 12:40:20 2010 +0200
     1.3 @@ -95,7 +95,7 @@
     1.4        |> snd
     1.5        |> map_filter (fn (_, (some_thm, proper)) => if proper then some_thm else NONE)
     1.6        |> map (holize o no_vars ctxt o AxClass.overload thy);
     1.7 -  in Thy_Output.output (Thy_Output.maybe_pretty_source (pretty_thm ctxt) src thms) end;
     1.8 +  in Thy_Output.output ctxt (Thy_Output.maybe_pretty_source pretty_thm ctxt src thms) end;
     1.9  
    1.10  in
    1.11