summaryrefslogtreecommitdiffabout
path: root/scm/dictrans.scm
authorSergey Poznyakoff <gray@gnu.org.ua>2004-10-12 13:51:36 (GMT)
committer Sergey Poznyakoff <gray@gnu.org.ua>2004-10-12 13:51:36 (GMT)
commita46550c788f64087d9c8ab6aaa797c3b2459c10f (patch) (side-by-side diff)
tree19e32d7142f29ff6420cccd038d20677ff7cc200 /scm/dictrans.scm
parentfcf560f10c3e597fd74fabbddd2abcb7856dd7c1 (diff)
downloadellinika-a46550c788f64087d9c8ab6aaa797c3b2459c10f.tar.gz
ellinika-a46550c788f64087d9c8ab6aaa797c3b2459c10f.tar.bz2
Exit if --check was given
git-svn-id: file:///home/puszcza/svnroot/ellinika/trunk@227 941c8c0f-9102-463b-b60b-cd22ce0e6858
Diffstat (limited to 'scm/dictrans.scm') (more/less context) (ignore whitespace changes)
-rw-r--r--scm/dictrans.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/scm/dictrans.scm b/scm/dictrans.scm
index 5d7f38e..4c365c2 100644
--- a/scm/dictrans.scm
+++ b/scm/dictrans.scm
@@ -797,7 +797,8 @@
(lambda (x)
(if (not (xmltrans:parse-file x))
(exit 1)))
- input-files)))
+ input-files)
+ (exit 0)))
(let ((conn (sql-connect sql-iface sql-host sql-port sql-database
sql-username sql-password)))

Return to:

Send suggestions and report system problems to the System administrator.