Use nms::db_connect() everywhere.

[nms] / web / nettkart-text.pl

diff --git a/web/nettkart-text.pl b/web/nettkart-text.pl
index 6ac1d9f9667b7beb6a5812b8b0e64ad1e023e804..7255e581de5874a7af31ea7530be33a9b3041969 100755 (executable)
--- a/web/nettkart-text.pl
+++ b/web/nettkart-text.pl
@@ -1,10 +1,11 @@
 #! /usr/bin/perl
 use CGI;
 use DBI;
+use lib '../include';
+use nms;
 my $cgi = CGI->new;
 
-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();
 print $cgi->header(-type=>'text/html', -refresh=>'10; http://nms.tg05.gathering.org/nettkart-text.pl');
 
 print <<"EOF";