summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>1999-12-15 14:51:41 +0000
committerFrancois Pons <fpons@mandriva.com>1999-12-15 14:51:41 +0000
commit9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea (patch)
treed69d5d0f7dedd113663739f8c87bf2a5d7275ce9 /perl-install/install_any.pm
parent3bc20c1ea1a306475ea8eab8e8e1973625ca785f (diff)
downloaddrakx-9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea.tar
drakx-9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea.tar.gz
drakx-9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea.tar.bz2
drakx-9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea.tar.xz
drakx-9f5085ca7e2d1233c247eb7fd6d0e55b1f717eea.zip
*** empty log message ***
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm18
1 files changed, 12 insertions, 6 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 369227b9a..ada4b10d2 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -598,22 +598,28 @@ sub kdeicons_postinstall($) {
foreach (<F>) {
if (/^\/dev\/(\S+)\s+\/mnt\/cdrom (\d*)\s+/x) {
my %toreplace = ( device => $1, id => $2 );
- template2userfile($prefix, "/usr/share/cdrom.fsdev.kdelnk.in", "Desktop/cdrom$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/cdrom.fsdev.kdelnk.in", "Desktop/Cd-Rom". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/dev\/(\S+)\s+\/mnt\/zip (\d*)\s+/x) {
my %toreplace = ( device => $1, id => $2 );
- template2userfile($prefix, "/usr/share/zip.fsdev.kdelnk.in", "Desktop/zip$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/zip.fsdev.kdelnk.in", "Desktop/Zip". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/dev\/(\S+)\s+\/mnt\/floppy (\d*)\s+/x) {
my %toreplace = ( device => $1, id => $2 );
- template2userfile($prefix, "/usr/share/floppy.fsdev.kdelnk.in", "Desktop/floppy$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/floppy.fsdev.kdelnk.in", "Desktop/Floppy". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/mnt\/cdrom (\d*)\s+\/mnt\/cdrom\d*\s+supermount/x) {
my %toreplace = ( id => $1 );
- template2userfile($prefix, "/usr/share/cdrom.kdelnk.in", "Desktop/cdrom$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/cdrom.kdelnk.in", "Desktop/Cd-Rom". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/mnt\/zip (\d*)\s+\/mnt\/zip\d*\s+supermount/x) {
my %toreplace = ( id => $1 );
- template2userfile($prefix, "/usr/share/zip.kdelnk.in", "Desktop/zip$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/zip.kdelnk.in", "Desktop/Zip". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/mnt\/floppy (\d*)\s+\/mnt\/floppy\d*\s+supermount/x) {
my %toreplace = ( id => $1 );
- template2userfile($prefix, "/usr/share/floppy.kdelnk.in", "Desktop/floppy$2.kdelnk", 1, %toreplace);
+ template2userfile($prefix, "/usr/share/floppy.kdelnk.in", "Desktop/Floppy". ($2 && "_$2") ."kdelnk",
+ 1, %toreplace);
} elsif (/^\/dev\/(\S+)\s+\/mnt\/DOS_ (\S*)\s+/x) {
my %toreplace = ( device => $1, id => $2, mntpoint => "/mnt/DOS_$2" );
template2userfile($prefix, "/usr/share/Dos_.kdelnk.in", "Desktop/Dos_$2.kdelnk", 1, %toreplace);