aboutsummaryrefslogtreecommitdiffstats
path: root/hypo.hy
diff options
context:
space:
mode:
Diffstat (limited to 'hypo.hy')
-rwxr-xr-xhypo.hy4
1 files changed, 2 insertions, 2 deletions
diff --git a/hypo.hy b/hypo.hy
index 05fa858..8053488 100755
--- a/hypo.hy
+++ b/hypo.hy
@@ -137,7 +137,7 @@ If no lexer is found fallback onto the text lexer."
(setv web.ctx.status (str "201 Created"))
(+ web.ctx.home "/" *prefix* (get h 0) "\n")))]])
-(when (= __name__ "__main__")
- (let ((sys.argv (slice sys.argv 1))
+(defun hypo-start [argv]
+ (let ((sys.argv (cdr (cdr sys.argv)))
(app (web.application urls (globals))))
(.run app)))