Fix reverse stuff in make-named-secondary.pl.

[nms] / web / dhcpkart.pl

diff --git a/web/dhcpkart.pl b/web/dhcpkart.pl
index 2558fb99542fd118b98509758eb2904cdd43143e..e428eca776b6cc3042de3267969aede1f12f4eea 100755 (executable)
--- a/web/dhcpkart.pl
+++ b/web/dhcpkart.pl
@@ -2,13 +2,14 @@
 use CGI;
 use GD;
 use DBI;
+use lib '../include';
+use nms;
 my $cgi = CGI->new;
 
 my $greentimeout = 900;
 my $maxtimeout = $greentimeout*9;
 
-my $dbh = DBI->connect("dbi:Pg:dbname=snmpfetch;host=violet.tg05.gathering.org", "snmpfetch", "removed")
-        or die "Couldn't connect to database";
+my $dbh = nms::db_connect();
 
 GD::Image->trueColor(1);
 $img = GD::Image->new('snmp-bg.png');