diff options
author | Daouda Lo <daouda@mandriva.com> | 2004-12-23 15:40:18 +0000 |
---|---|---|
committer | Daouda Lo <daouda@mandriva.com> | 2004-12-23 15:40:18 +0000 |
commit | bada554b3357ac90e7c18d82e656826732bdbcd0 (patch) | |
tree | 3499118bb054de00ff1f5f3e0b8b43f110faa956 /mdkonline.pm | |
parent | d0f562cb4cbd7afcb26620fc1d48860b00dde119 (diff) | |
download | mgaonline-bada554b3357ac90e7c18d82e656826732bdbcd0.tar mgaonline-bada554b3357ac90e7c18d82e656826732bdbcd0.tar.gz mgaonline-bada554b3357ac90e7c18d82e656826732bdbcd0.tar.bz2 mgaonline-bada554b3357ac90e7c18d82e656826732bdbcd0.tar.xz mgaonline-bada554b3357ac90e7c18d82e656826732bdbcd0.zip |
merge changes in current cvs branch
Diffstat (limited to 'mdkonline.pm')
-rw-r--r-- | mdkonline.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/mdkonline.pm b/mdkonline.pm index b33a3de8..af2b3eb0 100644 --- a/mdkonline.pm +++ b/mdkonline.pm @@ -24,7 +24,7 @@ sub get_release() { sub get_distro_type() { my $d; - cat_($release_file) =~ /(corporate|mnf)/i, and $d = $1; + cat_($release_file) =~ /(corporate|mnf)/i, and $d = lc($1); $d } @@ -213,7 +213,7 @@ sub write_wide_conf { my $wideconf = '/etc/sysconfig/mdkonline'; my $d = localtime(); $d =~ s/\s+/_/g; - output_with_perm $wideconf, 644, + output_with_perm $wideconf, 0644, qq(LOGIN=$login MACHINE=$boxname COUNTRY=$country |