command-line.startup: -help isn't going to be set.

2017-02-02 10:00:23 -08:00 · 2017-02-02 10:00:23 -08:00 · fe4093d67a
parent 0f7646e3ed
commit fe4093d67a
1 changed files with 2 additions and 2 deletions
--- a/basis/command-line/startup/startup.factor
+++ b/basis/command-line/startup/startup.factor
@ -36,8 +36,8 @@ from within Factor for more information.
 " write ;

 : help? ( -- ? )
-    "help" get "-help" get or "h" get or
-    os windows? [ script get "/?" = ] [ f ] if or ;
+    "help" get "h" get or
+    os windows? [ script get "/?" = or ] when ;

 : command-line-startup ( -- )
    (command-line) parse-command-line