summaryrefslogtreecommitdiff
path: root/rh-bin/listdropboxes.cgi
diff options
context:
space:
mode:
Diffstat (limited to 'rh-bin/listdropboxes.cgi')
-rwxr-xr-xrh-bin/listdropboxes.cgi5
1 files changed, 3 insertions, 2 deletions
diff --git a/rh-bin/listdropboxes.cgi b/rh-bin/listdropboxes.cgi
index 03dc4ee..f008c51 100755
--- a/rh-bin/listdropboxes.cgi
+++ b/rh-bin/listdropboxes.cgi
@@ -50,14 +50,15 @@ while (my $q = CGI::Fast->new) {
$errorstring = $dropboxes[2];
}
} elsif($result == 0) {
- $responsecode = 403;
+ $responsecode = 401;
} else {
$responsecode = 500;
}
RHRD::rddb::closedb($dbh);
}
- print "Content-type: application/xml; charset=UTF-8\n\n";
+ print "Content-type: application/xml; charset=UTF-8\n";
+ print "Status: $responsecode\n\n";
if($responsecode != 200) {
print "<RDWebResult>\n";