*** empty log message ***
authorivan <ivan>
Thu, 22 Apr 1999 04:12:53 +0000 (04:12 +0000)
committerivan <ivan>
Thu, 22 Apr 1999 04:12:53 +0000 (04:12 +0000)
cgi/persons.cgi

index 4c7e03e..fc9de50 100755 (executable)
@@ -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 );