src/Pure/Isar/isar_cmd.ML

--- a/src/Pure/Isar/isar_cmd.ML	Thu Jan 24 23:51:15 2008 +0100
+++ b/src/Pure/Isar/isar_cmd.ML	Thu Jan 24 23:51:17 2008 +0100
@@ -394,7 +394,7 @@
 fun nested_command props (str, pos) =
   let val pos' = Position.of_properties (props @ Position.properties_of pos) in
     (case OuterSyntax.parse pos' str of
-      [transition] => Toplevel.properties props transition
+      [transition] => transition
     | _ => error "exactly one command expected")
   end;