From 920a449af5a6b4ecbf01a5a4e3bc4894ad302634 Mon Sep 17 00:00:00 2001
From: Frank Lichtenheld <frank@lichtenheld.de>
Date: Mon, 19 Mar 2007 16:56:01 +0100
Subject: [PATCH] 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>
---
 git-cvsserver.perl | 1 +
 1 file changed, 1 insertion(+)

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