solenv/bin/modules/installer/windows/media.pm | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+)
New commits: commit 01f4383f62b0a4e3b9184456a923d6f8c975cb8b Author: Thomas Arnhold <tho...@arnhold.org> Date: Thu Sep 12 06:29:13 2013 +0200 installer: restore generate_cab_filename_for_some_cabs Change-Id: I98155bcf6663aa0e7944807fd7cc8b49ab349ee8 diff --git a/solenv/bin/modules/installer/windows/media.pm b/solenv/bin/modules/installer/windows/media.pm index 9f53069..7214e90 100644 --- a/solenv/bin/modules/installer/windows/media.pm +++ b/solenv/bin/modules/installer/windows/media.pm @@ -61,6 +61,30 @@ sub get_media_source return ""; } +################################################# +# Creating the cab file name dynamically +################################################# + +sub generate_cab_filename_for_some_cabs +{ + my ( $allvariables, $id ) = @_; + + my $name = $allvariables->{'PRODUCTNAME'}; + + $name = lc($name); + $name =~ s/\.//g; + $name =~ s/\s//g; + + # possibility to overwrite the name with variable CABFILENAME + if ( $allvariables->{'CABFILENAME'} ) { $name = $allvariables->{'CABFILENAME'}; } + + $name = $name . $id . ".cab"; + + if ( $installer::globals::include_cab_in_msi ) { $name = "\#" . $name; } + + return $name; +} + sub get_maximum_filenumber { my ($allfiles, $maxcabfilenumber) = @_; _______________________________________________ Libreoffice-commits mailing list libreoffice-comm...@lists.freedesktop.org http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits