equal
deleted
inserted
replaced
147 |
147 |
148 fun eval_antiquote lex state (txt, pos) = |
148 fun eval_antiquote lex state (txt, pos) = |
149 let |
149 let |
150 fun expand (Antiquote.Text s) = s |
150 fun expand (Antiquote.Text s) = s |
151 | expand (Antiquote.Antiq x) = |
151 | expand (Antiquote.Antiq x) = |
152 let val (opts, src) = Antiquote.read_antiq lex antiq x in |
152 let val (opts, src) = T.read_antiq lex antiq x in |
153 options opts (fn () => command src state) (); (*preview errors!*) |
153 options opts (fn () => command src state) (); (*preview errors!*) |
154 PrintMode.with_modes (! modes @ Latex.modes) |
154 PrintMode.with_modes (! modes @ Latex.modes) |
155 (Output.no_warnings (options opts (fn () => command src state))) () |
155 (Output.no_warnings (options opts (fn () => command src state))) () |
156 end |
156 end |
157 | expand (Antiquote.Open _) = "" |
157 | expand (Antiquote.Open _) = "" |