qw($gTemplateDir),
qw($gDefaultPackage),
qw($gSpamMaxThreads $gSpamSpamsPerThread $gSpamKeepRunning $gSpamScan $gSpamCrossassassinDb),
+ qw($gDatabase),
],
text => [qw($gBadEmailPrefix $gHTMLTail $gHTMLExpireNote),
],
=back
+=head2 Database
+
+=over
+
+=item database
+
+Name of debbugs PostgreSQL database service. If you wish to not use a service
+file, provide a full DBD::Pg compliant data-source, for example:
+C<"dbi:Pg:dbname=dbname">
+
+=back
+
+=cut
+
+set_default(\%config,'database',undef);
+
=head2 Text Fields
The following are the only text fields in general use in the scripts;
return;
}
# first, figure out what type of file we're reading in.
- my $fh = new IO::File $conf_file,'r'
+ my $fh = IO::File->new($conf_file,'r')
or die "Unable to open configuration file $conf_file for reading: $!";
# A new version configuration file must have a comment as its first line
my $first_line = <$fh>;