We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 986d3e6 commit 9201270Copy full SHA for 9201270
scripts/download.pl
@@ -243,7 +243,7 @@
243
my ($outBytes) = &decryptMessages(@fileBytes); # get the message data
244
my @outBytes = @{ $outBytes };
245
open (MESSAGEFILE, ">>$messageFile"); # write out the messages to a file
246
- unless (scalar (@outBytes)) { print MESSAGEFILE "No message(s) found.\n"; }
+ unless (scalar (@outBytes)) { print MESSAGEFILE $filename . ',' . "No message(s) found.\n"; }
247
else {
248
foreach my $message (@outBytes) {
249
print MESSAGEFILE $filename . ','; # include the file name
0 commit comments