diff options
| author | Frank Lichtenheld <frank@lichtenheld.de> | 2007-03-19 16:56:01 +0100 |
|---|---|---|
| committer | Junio C Hamano <junkio@cox.net> | 2007-03-22 01:26:26 -0700 |
| commit | 920a449af5a6b4ecbf01a5a4e3bc4894ad302634 (patch) | |
| tree | 4ad974029f82f751004e205440862ad45ccd5b63 /git-cvsserver.perl | |
| parent | eb1780d480c2c57c58024692055a6ee33074a95f (diff) | |
| download | git-920a449af5a6b4ecbf01a5a4e3bc4894ad302634.tar.gz | |
cvsserver: Abort if connect to database fails
Currently all calls to the database backend make no
error checking or handling at all. At least abort
if the connection to the database failed since
there is really no way we could do anything useful
after that.
Signed-off-by: Frank Lichtenheld <frank@lichtenheld.de>
Signed-off-by: Junio C Hamano <junkio@cox.net>
Diffstat (limited to 'git-cvsserver.perl')
| -rwxr-xr-x | git-cvsserver.perl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/git-cvsserver.perl b/git-cvsserver.perl index 6d10aa3343..941a91bcac 100755 --- a/git-cvsserver.perl +++ b/git-cvsserver.perl @@ -2168,6 +2168,7 @@ sub new $self->{dbh} = DBI->connect("$self->{dbdriver}:dbname=$self->{dbname}", $self->{dbuser}, $self->{dbpass}); + die "Error connecting to database\n" unless defined $self->{dbh}; $self->{tables} = {}; foreach my $table ( $self->{dbh}->tables ) |