summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-01-04 22:13:57 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-01-04 22:13:57 +0000
commit85e21d9abb2daf68be31c33dcdbc8874c3cc8fdc (patch)
tree3a45e1e56f50f9f59ea5d3db0be6b279ee0eb526 /perl-install/install_any.pm
parentf7537f35d8002323124bbb8aa40b627152660bf3 (diff)
downloaddrakx-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.pm11
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";
}
}