author | wenzelm |
Tue, 03 Apr 2012 20:08:08 +0200 | |
changeset 47314 | 644a3b74cfd0 |
parent 47313 | 6a0ee401b899 |
child 47315 | 89a4bbf9790d |
--- a/src/Pure/Isar/bundle.ML Tue Apr 03 19:49:14 2012 +0200 +++ b/src/Pure/Isar/bundle.ML Tue Apr 03 20:08:08 2012 +0200 @@ -97,7 +97,7 @@ fun augment ctxt = let val ((_, _, _, ctxt'), _) = ctxt - |> Context_Position.set_visible true + |> Context_Position.restore_visible lthy |> gen_includes prep_bundle raw_incls |> prep_decl ([], []) I raw_elems; in ctxt' |> Context_Position.restore_visible ctxt end;