diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-12-28 02:39:40 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-12-28 02:39:40 +0100 |
| commit | a42ecb925bcac45dc31554d44920e3b62d1de65f (patch) | |
| tree | 98667195765958ea201bb09dd42194206818f4a8 /module/main.scm | |
| parent | Allow running without config file. (diff) | |
| download | calp-a42ecb925bcac45dc31554d44920e3b62d1de65f.tar.gz calp-a42ecb925bcac45dc31554d44920e3b62d1de65f.tar.xz | |
Made error on missing main not print trace.
Diffstat (limited to 'module/main.scm')
| -rwxr-xr-x | module/main.scm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/module/main.scm b/module/main.scm index d9fb20cb..4eddeb14 100755 --- a/module/main.scm +++ b/module/main.scm @@ -64,7 +64,11 @@ exec guile -e main -s $0 "$@" ((info) info-main) ((ical) ical-main) ((server) server-main) - (else => (lambda (s) (error "Unsupported mode of operation:" s)))) + (else => (lambda (s) + (format (current-error-port) + "Unsupported mode of operation: ~a~%" + s) + (exit 1)))) ropt)) (newline))) |