src/Pure/PIDE/isar_document.scala
changeset 43724 4e58485fa320
parent 43723 8a63c95b1d5b
child 43731 70072780e095
     1.1 --- a/src/Pure/PIDE/isar_document.scala	Sun Jul 10 13:00:22 2011 +0200
     1.2 +++ b/src/Pure/PIDE/isar_document.scala	Sun Jul 10 13:51:21 2011 +0200
     1.3 @@ -143,15 +143,12 @@
     1.4        edits: List[Document.Edit_Command_ID], headers: List[(String, Thy_Header.Header)])
     1.5    {
     1.6      val arg1 =
     1.7 -      XML_Data.make_list(
     1.8 -        XML_Data.make_pair(XML_Data.make_string,
     1.9 -          XML_Data.make_option(XML_Data.make_list(
    1.10 -              XML_Data.make_pair(
    1.11 -                XML_Data.make_option(XML_Data.make_long),
    1.12 -                XML_Data.make_option(XML_Data.make_long))))))(edits)
    1.13 +    { import XML_Data.Make._
    1.14 +      list(pair(string, option(list(pair(option(long), option(long))))))(edits) }
    1.15  
    1.16      val arg2 =
    1.17 -      XML_Data.make_list(XML_Data.make_pair(XML_Data.make_string, Thy_Header.make_xml_data))(headers)
    1.18 +    { import XML_Data.Make._
    1.19 +      list(pair(string, Thy_Header.make_xml_data))(headers) }
    1.20  
    1.21      input("Isar_Document.edit_version",
    1.22        Document.ID(old_id), Document.ID(new_id),