/[rserv]/bin/MasterDelTable
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /bin/MasterDelTable

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.2 by dpavlin, Tue Aug 5 21:10:28 2003 UTC revision 1.3 by dpavlin, Sun Nov 2 10:21:45 2003 UTC
# Line 34  my $dbname = $ARGV[0]; Line 34  my $dbname = $ARGV[0];
34  my $table = $ARGV[1];  my $table = $ARGV[1];
35  #my $keyname = $ARGV[2];  #my $keyname = $ARGV[2];
36    
37  my $minfo = "dbname=$dbname";  my $minfo = MkInfo($dbname,$masterhost,$masterport,$masteruser,$masterpassword);
 $minfo = "$minfo host=$masterhost" if (defined($masterhost));  
 $minfo = "$minfo port=$masterport" if (defined($masterport));  
 $minfo = "$minfo user=$masteruser" if (defined($masteruser));  
 $minfo = "$minfo password=$masterpassword" if (defined($masterpassword));  
38    
39  my $conn = Pg::connectdb($minfo);  my $conn = Pg::connectdb($minfo);
40  if ($conn->status != PGRES_CONNECTION_OK) {  if ($conn->status != PGRES_CONNECTION_OK) {
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.26