diff options
| author | Andras Timar <atimar@suse.com> | 2011-11-21 09:58:55 +0100 |
|---|---|---|
| committer | Andras Timar <atimar@suse.com> | 2011-11-21 10:05:20 +0100 |
| commit | 5fc21e87b9bcc55a542c4e675f4b78cc578026d1 (patch) | |
| tree | 07f42a8f9c29de967f5cb1aa80998164f13365b1 /solenv/bin | |
| parent | bacfb77443e0a03904b4082c3211f05464279661 (diff) | |
in perl there are no barewords for true/false
Diffstat (limited to 'solenv/bin')
| -rw-r--r-- | solenv/bin/modules/installer/windows/property.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/solenv/bin/modules/installer/windows/property.pm b/solenv/bin/modules/installer/windows/property.pm index ee33596760cb..1e6e921132f3 100644 --- a/solenv/bin/modules/installer/windows/property.pm +++ b/solenv/bin/modules/installer/windows/property.pm @@ -480,7 +480,7 @@ sub update_property_table my $propertyfile = installer::files::read_file($properyfilename); - my $hasarpnomodify = false; + my $hasarpnomodify = 0; # Getting the new values # Some values (arpcomments, arpcontacts, ...) are inserted from the Property.mlf @@ -506,7 +506,7 @@ sub update_property_table ${$propertyfile}[$i] =~ s/\bPRODUCTNAMETEMPLATE\b/$productname/; ${$propertyfile}[$i] =~ s/\bPRODUCTVERSIONTEMPLATE\b/$productversion/; ${$propertyfile}[$i] =~ s/\bQUICKSTARTERLINKNAMETEMPLATE\b/$quickstarterlinkname/; - if ( ${$propertyfile}[$i] =~ m/\bARPNOMODIFY\b/ ) { $hasarpnomodify = true; } + if ( ${$propertyfile}[$i] =~ m/\bARPNOMODIFY\b/ ) { $hasarpnomodify = 1; } } # Check if are building silent MSI |