diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2005-09-15 11:45:50 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2005-09-15 11:45:50 +0000 |
| commit | e5c974810a664330fb070325337cd21dd148b697 (patch) | |
| tree | 2b7d547a543d3a3344f50c3efc97278c7138af90 /perl-install/install_any.pm | |
| parent | 8b606ca75db47a948c183893889b2803217062d3 (diff) | |
| download | drakx-backup-do-not-use-e5c974810a664330fb070325337cd21dd148b697.tar drakx-backup-do-not-use-e5c974810a664330fb070325337cd21dd148b697.tar.gz drakx-backup-do-not-use-e5c974810a664330fb070325337cd21dd148b697.tar.bz2 drakx-backup-do-not-use-e5c974810a664330fb070325337cd21dd148b697.tar.xz drakx-backup-do-not-use-e5c974810a664330fb070325337cd21dd148b697.zip | |
- there is no more adverstising icon
- cleaning
Diffstat (limited to 'perl-install/install_any.pm')
| -rw-r--r-- | perl-install/install_any.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 0350a827d..890e6b4c3 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1897,11 +1897,8 @@ sub copy_advertising { foreach (@files) { chomp; getAndSaveFile("$source_dir/$_", "$dir/$_"); - s/\.png/.pl/; - getAndSaveFile("$source_dir/$_", "$dir/$_"); - s/\.pl/_icon.png/; - getAndSaveFile("$source_dir/$_", "$dir/$_"); - s/_icon\.png/.png/; + (my $pl = $_) =~ s/\.png/.pl/; + getAndSaveFile("$source_dir/$pl", "$dir/$pl"); } @advertising_images = map { "$dir/$_" } @files; } |