nix-super/perl/lib/Nix/Config.pm.in

26 lines
455 B
Perl
Raw Normal View History

package Nix::Config;
use MIME::Base64;
use Nix::Store;
2013-11-25 18:38:33 +02:00
$version = "@PACKAGE_VERSION@";
$binDir = Nix::Store::getBinDir;
$storeDir = Nix::Store::getStoreDir;
%config = ();
2006-05-31 12:24:54 +03: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 12:24:54 +03:00
}
return 1;