[PATCH 5/5] cvsserver: Abort if connect to database fails

From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Mar 19, 2007, 15:56 UTC
Message-ID: <11743197672771-git-send-email-frank@lichtenheld.de>
In-Reply-To: <11743197614111-git-send-email-frank@lichtenheld.de>

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>
---
 git-cvsserver.perl |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/git-cvsserver.perl b/git-cvsserver.perl
index 6d10aa3..941a91b 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 )

-- 
1.5.0.3