summaryrefslogtreecommitdiff
path: root/src/skribilo.in
diff options
context:
space:
mode:
authorLudovic Courtès2007-12-14 12:40:45 +0100
committerLudovic Courtès2007-12-14 12:40:45 +0100
commit28d2d0f31f51e2b667f5a7fa3bd3347edf2d8e22 (patch)
tree20d124cedc9302ed0d974ae91aa7ad7646e139f6 /src/skribilo.in
parentf8b41ab7899927530b52b11f552ea9ceda866fea (diff)
downloadskribilo-28d2d0f31f51e2b667f5a7fa3bd3347edf2d8e22.tar.gz
skribilo-28d2d0f31f51e2b667f5a7fa3bd3347edf2d8e22.tar.lz
skribilo-28d2d0f31f51e2b667f5a7fa3bd3347edf2d8e22.zip
Return non-zero when an error is caught.
* src/guile/skribilo/condition.scm (%call-with-skribilo-error-catch): Make sure to always call EXIT. (call-with-skribilo-error-catch/exit): New. * src/pre-inst-skribilo.in: Use `call-with-skribilo-error-catch/exit'. * src/skribilo.in: Likewise.
Diffstat (limited to 'src/skribilo.in')
-rwxr-xr-xsrc/skribilo.in2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/skribilo.in b/src/skribilo.in
index a82f9ae..677856a 100755
--- a/src/skribilo.in
+++ b/src/skribilo.in
@@ -28,6 +28,6 @@ main='(module-ref (resolve-interface '\''(skribilo)) '\'skribilo')'
exec ${GUILE-@GUILE@} -L "@guilemoduledir@" -c "
(use-modules (skribilo condition))
-(call-with-skribilo-error-catch
+(call-with-skribilo-error-catch/exit
(lambda ()
(apply $main (cdr (command-line)))))" "$@"