4606 fix error in officedocs.pl output writing

This commit is contained in:
William Schaefer 2019-01-11 17:23:16 -05:00
parent 03d9aab703
commit 984abbb9cc

View File

@ -125,7 +125,7 @@ sub pluginmain {
# Print sorted content to report file
foreach my $u (sort {$a <=> $b} keys %files) {
my ($val,$data) = split(/:/,$files{$u},2);
::rptMsg("<PowerPoint name=\"".$val."\">".$data . "</PowerPoint);
::rptMsg("<PowerPoint name=\"".$val."\">".$data . "</PowerPoint>");
}
}
else {