summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2000-01-04 12:46:35 +0000
committerFrancois Pons <fpons@mandriva.com>2000-01-04 12:46:35 +0000
commit8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703 (patch)
treeef12dea171ff5ce76cdd156ff52afc7f7da604af /perl-install
parentbed9b1327dbb698791395344a8e0a98b018b9906 (diff)
downloaddrakx-8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703.tar
drakx-8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703.tar.gz
drakx-8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703.tar.bz2
drakx-8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703.tar.xz
drakx-8fef7733bb31cf0faa9d61c356e0ed5e6a2f8703.zip
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_any.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index 41007c735..d6a696c37 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -621,8 +621,8 @@ sub kdeicons_postinstall($) {
template2userfile($prefix, "/usr/share/floppy.kdelnk.in", "Desktop/Floppy". ($1 && " $1") .".kdelnk",
1, %toreplace);
} elsif (m|^/dev/(\S+)\s+(/mnt/DOS_\S*)\s+|) {
- my %toreplace = ( device => $1, id => $2, mntpoint => $2 );
- template2userfile($prefix, "/usr/share/Dos_.kdelnk.in", "Desktop/Dos_$2.kdelnk", 1, %toreplace);
+ my %toreplace = ( device => $1, id => $1, mntpoint => $2 );
+ template2userfile($prefix, "/usr/share/Dos_.kdelnk.in", "Desktop/Dos_$1.kdelnk", 1, %toreplace);
} elsif (m|^/dev/(\S+)\s+(\S*)\s+vfat\s+|) {
my %toreplace = ( device => $1, id => $1, mntpoint => $2 );
template2userfile($prefix, "/usr/share/Dos_.kdelnk.in", "Desktop/Dos_$1.kdelnk", 1, %toreplace);