GOOEY:
{
- print "Current connection settings:\n";
+ ## We only don't print this in quiet batch mode
+ if (! $QUIET or ! $bcargs->{batch}) {
+ print "Current connection settings:\n";
- print "1. Host: $host\n";
- print "2. Port: $port\n";
- print "3. User: $user\n";
- print "4. Database: $dbname\n";
- print "5. PID directory: $piddir\n";
+ print "1. Host: $host\n";
+ print "2. Port: $port\n";
+ print "3. User: $user\n";
+ print "4. Database: $dbname\n";
+ print "5. PID directory: $piddir\n";
+ }
## If in batch mode, we accept everything right away and move on
last GOOEY if $bcargs->{batch};
$rev =~ s/^\.//;
$rev =~ s/(\d+)\.\d+/$1/;
- print "Postgres version is: $maj.$min\n";
+ $QUIET or print "Postgres version is: $maj.$min\n";
## Bare minimum for the install is 8.1
if ($maj < 8 or (8 == $maj and $min < 1)) {