src/Pure/Thy/thy_output.ML
changeset 30613 b22d35d9ef28
parent 30590 1d9c9fcf8513
child 30635 a7d175c48228
     1.1 --- a/src/Pure/Thy/thy_output.ML	Fri Mar 20 20:20:09 2009 +0100
     1.2 +++ b/src/Pure/Thy/thy_output.ML	Fri Mar 20 20:21:38 2009 +0100
     1.3 @@ -156,7 +156,7 @@
     1.4            end
     1.5        | expand (Antiquote.Open _) = ""
     1.6        | expand (Antiquote.Close _) = "";
     1.7 -    val ants = Antiquote.read Antiquote.scan_text (Symbol_Pos.explode (txt, pos), pos);
     1.8 +    val ants = Antiquote.read (K ()) Antiquote.scan_text (Symbol_Pos.explode (txt, pos), pos);
     1.9    in
    1.10      if Toplevel.is_toplevel state andalso exists Antiquote.is_antiq ants then
    1.11        error ("Unknown context -- cannot expand document antiquotations" ^ Position.str_of pos)