equal
deleted
inserted
replaced
184 { |
184 { |
185 $manufacturerElseBlock = 0; |
185 $manufacturerElseBlock = 0; |
186 } |
186 } |
187 |
187 |
188 # If the line specifies a file, parse the source and destination locations. |
188 # If the line specifies a file, parse the source and destination locations. |
189 if ($line =~ m|\"([^\"]+)\"\s*\-\s*\"([^\"]+)\"|) |
189 if ($line =~ m|^ *\"([^\"]+)\"\s*\-\s*\"([^\"]+)\"|) |
190 { |
190 { |
191 my $sourcePath = $1; |
191 my $sourcePath = $1; |
192 |
192 |
193 # If the given file is a binary, check the target and binary type (+ the actual filename) from its path. |
193 # If the given file is a binary, check the target and binary type (+ the actual filename) from its path. |
194 if ($sourcePath =~ m:\w+(\.dll|\.exe)$:i) |
194 if ($sourcePath =~ m:\w+(\.dll|\.exe)$:i) |
267 ## Create another command line to check that the set capabilities are correct. |
267 ## Create another command line to check that the set capabilities are correct. |
268 #$commandToExecute = "elftran -dump s ".$binaryPath; |
268 #$commandToExecute = "elftran -dump s ".$binaryPath; |
269 } |
269 } |
270 |
270 |
271 print ("\n"); |
271 print ("\n"); |
272 print ("NOTE: A patched package should not be used for distribution!\n"); |
272 print ("NOTE: A patched package may not work as expected due to reduced capabilities.\n"); |
|
273 print (" Therefore it should not be used for any kind of Symbian signing or distribution!\n"); |
273 print ("\n"); |
274 print ("\n"); |
274 } |
275 } |
275 } |
276 } |
276 else |
277 else |
277 { |
278 { |