X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=cgi%2Fpersons.cgi;h=fc9de5037b330eea04b7711ddf4cb3c7cfd69122;hb=68ac5fb47fd935559018602bf411e5d14b966728;hp=4c7e03ebb2182831335dad258a791b204b4d028d;hpb=59334ecde5ad866ad8937f002f1faee48c1906d6;p=technostate.git

diff --git a/cgi/persons.cgi b/cgi/persons.cgi
index 4c7e03e..fc9de50 100755
--- a/cgi/persons.cgi
+++ b/cgi/persons.cgi
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -Tw
-# $Id: persons.cgi,v 1.1 1999-01-27 09:55:05 ivan Exp $
+# $Id: persons.cgi,v 1.2 1999-04-22 04:12:53 ivan Exp $
 # Copyright (c) 1999 Ivan Kohler.  All rights reserved.
 # This program is free software; you can redistribute it and/or modify it under
 # the same terms as perl itself
@@ -13,9 +13,9 @@ use CGI;
 use CGI::Carp qw(fatalsToBrowser);
 use DBI;
 
-$data_source = "DBI:mysql:test";
-$user = "ivan";
-$password = "";
+$data_source = "DBI:mysql:technostate";
+$user = "agent";
+$password = "t3chno";
 
 $table = "PERSONS";
 @fields = qw( ID NAME EMAIL AFFILIATION );