lix/perl/lib/Nix/Config.pm.in

25 lines
439 B
Perl
Raw Normal View History

package Nix::Config;
use MIME::Base64;
2013-11-25 17:38:33 +01:00
$version = "@PACKAGE_VERSION@";
$binDir = Nix::Store::getBinDir;
$storeDir = Nix::Store::getStoreDir;
%config = ();
2006-05-31 11:24:54 +02:00
sub readConfig {
my $config = "$confDir/nix.conf";
return unless -f $config;
open CONFIG, "<$config" or die "cannot open '$config'";
while (<CONFIG>) {
/^\s*([\w\-\.]+)\s*=\s*(.*)$/ or next;
$config{$1} = $2;
}
close CONFIG;
2006-05-31 11:24:54 +02:00
}
return 1;