src/Pure/Thy/bibtex.ML
changeset 67386 998e01d6f8fd
parent 67301 e255c76db052
child 67463 a5ca98950a91
equal deleted inserted replaced
67385:deb9b0283259 67386:998e01d6f8fd
    38 
    38 
    39 val cite_macro = Attrib.setup_config_string \<^binding>\<open>cite_macro\<close> (K "cite");
    39 val cite_macro = Attrib.setup_config_string \<^binding>\<open>cite_macro\<close> (K "cite");
    40 
    40 
    41 val _ =
    41 val _ =
    42   Theory.setup
    42   Theory.setup
    43    (Thy_Output.add_option \<^binding>\<open>cite_macro\<close> (Config.put cite_macro) #>
    43    (Document_Antiquotation.setup_option \<^binding>\<open>cite_macro\<close> (Config.put cite_macro) #>
    44     Thy_Output.antiquotation \<^binding>\<open>cite\<close>
    44     Document_Antiquotation.setup \<^binding>\<open>cite\<close>
    45       (Scan.lift
    45       (Scan.lift
    46         (Scan.option (Parse.verbatim || Parse.cartouche) --
    46         (Scan.option (Parse.verbatim || Parse.cartouche) --
    47          Parse.and_list1 (Parse.position Args.name)))
    47          Parse.and_list1 (Parse.position Args.name)))
    48       (fn {context = ctxt, ...} => fn (opt, citations) =>
    48       (fn {context = ctxt, ...} => fn (opt, citations) =>
    49         let
    49         let