src/Pure/PIDE/isar_document.ML
changeset 44197 458573968568
parent 44185 05641edb5d30
child 44299 061599cb6eb0
equal deleted inserted replaced
44196:3588f71abb50 44197:458573968568
    31             end;
    31             end;
    32 
    32 
    33       val await_cancellation = Document.cancel_execution state;
    33       val await_cancellation = Document.cancel_execution state;
    34       val (updates, state') = Document.edit old_id new_id edits state;
    34       val (updates, state') = Document.edit old_id new_id edits state;
    35       val _ = await_cancellation ();
    35       val _ = await_cancellation ();
       
    36       val _ = Document.join_commands state';
    36       val _ =
    37       val _ =
    37         Output.status (Markup.markup (Markup.assign new_id)
    38         Output.status (Markup.markup (Markup.assign new_id)
    38           (implode (map (Markup.markup_only o Markup.edit) updates)));
    39           (implode (map (Markup.markup_only o Markup.edit) updates)));
    39       val state'' = Document.execute new_id state';
    40       val state'' = Document.execute new_id state';
    40     in state'' end));
    41     in state'' end));