diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2005-02-24 16:59:12 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2005-02-24 16:59:12 +0000 |
commit | 37d2a12be69c57b02050b6a78169215ce6b544c1 (patch) | |
tree | e5b6e783d8f1e83dc1c2a600580a49bbcac001c2 /perl-install | |
parent | abc1d77ec334127352b0d454cf16fd2f34fafbfd (diff) | |
download | drakx-37d2a12be69c57b02050b6a78169215ce6b544c1.tar drakx-37d2a12be69c57b02050b6a78169215ce6b544c1.tar.gz drakx-37d2a12be69c57b02050b6a78169215ce6b544c1.tar.bz2 drakx-37d2a12be69c57b02050b6a78169215ce6b544c1.tar.xz drakx-37d2a12be69c57b02050b6a78169215ce6b544c1.zip |
adapt to new Libconf API
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakups | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/standalone/drakups b/perl-install/standalone/drakups index 6995377c5..26126bc85 100755 --- a/perl-install/standalone/drakups +++ b/perl-install/standalone/drakups @@ -38,7 +38,7 @@ sub writeconf() { } sub read_nut_config() { - $struct = Libconf::Glueconf::NUT::Ups_conf->new($files{devices}) + $struct = Libconf::Glueconf::NUT::Ups_conf->new({ filename => $files{devices} }) } sub readDriversList() { @@ -273,7 +273,7 @@ my @pages = ( remove => sub {}, }, load => sub { - $users = Libconf::Glueconf::NUT::Ups_conf->new($files{users}); + $users = Libconf::Glueconf::NUT::Ups_conf->new({ filename => $files{users} }); map { [ $_ ] } keys %$users; }, id => "users", |