src/Pure/PIDE/protocol.ML
changeset 52849 199e9fa5a5c2
parent 52808 143f225e50f5
child 52862 930ce8eacb87
--- a/src/Pure/PIDE/protocol.ML	Fri Aug 02 12:19:29 2013 +0200
+++ b/src/Pure/PIDE/protocol.ML	Fri Aug 02 14:26:09 2013 +0200
@@ -56,7 +56,9 @@
                       val imports' = map (rpair Position.none) imports;
                       val header = Thy_Header.make (name, Position.none) imports' keywords;
                     in Document.Deps (master, header, errors) end,
-                  fn (a :: b, []) => Document.Perspective (bool_atom a, map int_atom b)]))
+                  fn (a :: b, c) =>
+                    Document.Perspective (bool_atom a, map int_atom b,
+                      list (triple int string (list string)) c)]))
             end;
 
         val (removed, assign_update, state') = Document.update old_id new_id edits state;