diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2000-01-04 22:13:57 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2000-01-04 22:13:57 +0000 |
commit | 85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc (patch) | |
tree | 3a45e1e56f50f9f59ea5d3db0be6b279ee0eb526 /perl-install/install_any.pm | |
parent | f7537f35d8002323124bbb8aa40b627152660bf3 (diff) | |
download | drakx-85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc.tar drakx-85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc.tar.gz drakx-85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc.tar.bz2 drakx-85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc.tar.xz drakx-85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc.zip |
no_comment
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r-- | perl-install/install_any.pm | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index e9905906a..7ccb2e73e 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -578,14 +578,9 @@ sub kderc_largedisplay($) { kdeiconstyle => "KDEIconStyle=Large\n", }); foreach ("/etc/skel", "/root", list_home()) { - my $found; substInFile { - $found ||= /KFM Misc Defaults/; - $_ .= -"[KFM Misc Defaults] -GridWidth=78 -GridHeight=75 -" if eof && !$found; + s/^(GridWidth)=85/$1=100/; + s/^(GridWidth)=70/$1=75/; } "$prefix$_/.kde/share/config/kfmrc" } } @@ -643,7 +638,7 @@ sub kdeicons_postinstall($) { foreach my $dir (map { "$prefix$_/Desktop" } qw(/etc/skel /root)) { -d $dir or next; foreach (grep { /\.kdelnk$/ } all($dir)) { - cat_("$dir/$_") =~ /^Name\[$lang\]=(.*)/m + cat_("$dir/$_") =~ /^Name\[$lang\]=(.{2,14})$/m and rename "$dir/$_", "$dir/$1.kdelnk"; } } |