src/HOL/Orderings.thy
changeset 58893 9e0ecb66d6a7
parent 58889 5b7a9633cfa8
child 59000 6eb0725503fc
     1.1 --- a/src/HOL/Orderings.thy	Mon Nov 03 14:31:15 2014 +0100
     1.2 +++ b/src/HOL/Orderings.thy	Mon Nov 03 14:50:27 2014 +0100
     1.3 @@ -439,7 +439,7 @@
     1.4    end;
     1.5  
     1.6  val _ =
     1.7 -  Outer_Syntax.improper_command @{command_spec "print_orders"}
     1.8 +  Outer_Syntax.command @{command_spec "print_orders"}
     1.9      "print order structures available to transitivity reasoner"
    1.10      (Scan.succeed (Toplevel.unknown_context o
    1.11        Toplevel.keep (print_structures o Toplevel.context_of)));