From 71adee48209840198f90a6b9da33b73830ebbfeb Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Thu, 22 Aug 2013 21:44:19 +0200 Subject: [PATCH] Don't remove so many arguments --- hypo.hy | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hypo.hy b/hypo.hy index 8053488..a749984 100755 --- a/hypo.hy +++ b/hypo.hy @@ -138,6 +138,6 @@ If no lexer is found fallback onto the text lexer." (+ web.ctx.home "/" *prefix* (get h 0) "\n")))]]) (defun hypo-start [argv] - (let ((sys.argv (cdr (cdr sys.argv))) + (let ((sys.argv (cdr sys.argv)) (app (web.application urls (globals)))) (.run app)))