summaryrefslogtreecommitdiff
path: root/bin/tissue
diff options
context:
space:
mode:
Diffstat (limited to 'bin/tissue')
-rwxr-xr-xbin/tissue8
1 files changed, 3 insertions, 5 deletions
diff --git a/bin/tissue b/bin/tissue
index 31ec574..afad9e4 100755
--- a/bin/tissue
+++ b/bin/tissue
@@ -1,6 +1,6 @@
#!/usr/bin/env sh
# -*- mode: scheme; -*-
-exec guile --no-auto-compile -s "$0" "$@"
+exec guile --no-auto-compile -e main -s "$0" "$@"
!#
;;; tissue --- Text based issue tracker
@@ -489,7 +489,7 @@ Pull latest from upstream repositories.
hostname)
(exit #f)))))))))
-(define (main . args)
+(define (main args)
(guard (c ((condition-git-error c)
=> (lambda (git-error)
(display (git-error-message git-error) (current-error-port))
@@ -549,6 +549,4 @@ Pull latest from upstream repositories.
args))))))
;; tissue is an alias for `tissue search'
((_)
- (main "tissue" "search")))))
-
-(apply main (command-line))
+ (main '("tissue" "search"))))))