From ed08019dd9df6f942aa25f94bda6f944e3d007e8 Mon Sep 17 00:00:00 2001
From: Christian Pointner <equinox@helsinki.at>
Date: Wed, 25 Jan 2012 15:11:49 +0000
Subject: improved output at non-fitting dropbox

git-svn-id: https://svn.helsinki.at/rhimport/trunk@125 7c65635b-ec39-4f67-a626-873dbafdd612

diff --git a/rhimport-ra b/rhimport-ra
index bbe6d26..0c0f49f 100755
--- a/rhimport-ra
+++ b/rhimport-ra
@@ -56,9 +56,9 @@ my $dbh = DBI->connect("DBI:mysql:$DB:$DBHOST","$DBUSER","$DBPW") or die "Databa
 my @allowed_dbs = rhimport::get_dropboxes($dbh, $user, $group);
 
 if(scalar(@allowed_dbs) != 1) {
-  print "found multiple Dropboxes for this group?!\n";
+  print "found multiple or no Dropboxes for this group?!\n";
   $dbh->disconnect();
-  exit 0;
+  exit 1;
 }
 my $dropbox = $allowed_dbs[0]->{'PATH'};
 my $to_cart = $allowed_dbs[0]->{'TO_CART'};
diff --git a/rhimport-rs b/rhimport-rs
index 4e5f87f..1f2ed59 100755
--- a/rhimport-rs
+++ b/rhimport-rs
@@ -58,7 +58,7 @@ my @allowed_dbs = rhimport::get_dropboxes($dbh, $user, $group);
 if(scalar(@allowed_dbs) != 2) {
   print "found more or less than 2 Dropboxes for this group?!\n";
   $dbh->disconnect();
-  exit 0;
+  exit 1;
 }
 
 my $idx = 0;
diff --git a/rhimport-wl b/rhimport-wl
index 492460d..ddfc63e 100755
--- a/rhimport-wl
+++ b/rhimport-wl
@@ -56,9 +56,9 @@ my $dbh = DBI->connect("DBI:mysql:$DB:$DBHOST","$DBUSER","$DBPW") or die "Databa
 my @allowed_dbs = rhimport::get_dropboxes($dbh, $user, $group);
 
 if(scalar(@allowed_dbs) != 1) {
-  print "found multiple Dropboxes for this group?!\n";
+  print "found multiple or no Dropboxes for this group?!\n";
   $dbh->disconnect();
-  exit 0;
+  exit 1;
 }
 my $dropbox = $allowed_dbs[0]->{'PATH'};
 my $to_cart = $allowed_dbs[0]->{'TO_CART'};    
-- 
cgit v0.10.2