Changeset 221 for trunk/npemap.org.uk/perllib

Timestamp:

Oct 29, 2006, 4:59:46 PM (15 years ago)

Author:

Dominic Hargreaves

Message:

More modularisation

Location:

trunk/npemap.org.uk/perllib

Files:

• NPEMap.pm (added)
• NPEMap/Config.pm (modified) (1 diff)

trunk/npemap.org.uk/perllib/NPEMap/Config.pm

@@ -7 +7 @@
 require Exporter;
 @ISA    = qw(Exporter);
-@EXPORT = qw($tt_config);
+@EXPORT = qw($tt_config $dbname $dbhost $dbuser $dbpass);
 
 # Read in site config
-my $config = 'npemap.conf';
+my $config = $ENV{'HOME'} . '/.npemap.conf';
 do $config or die "Can't read $config!\n";