From d305f016e91cb81f2c9ffc41c3e1f23a4a99b504 Mon Sep 17 00:00:00 2001
From: Ryan Burgoyne <rburgoyne@gecoinc.com>
Date: Mon, 25 Feb 2013 13:32:27 -0700
Subject: [PATCH] added error handling to avoid error message about
uninitialized value in concatenation
---
pandoc.pm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/pandoc.pm b/pandoc.pm
index 4df0249..eff476b 100644
--- a/pandoc.pm
+++ b/pandoc.pm
@@ -244,7 +244,9 @@ sub htmlize ($@) {
my $compiled_string = '';
foreach my $word_or_space(@uncompiled_string) {
if (ref($word_or_space) eq "HASH") {
- $compiled_string .= $word_or_space->{"Str"};
+ if ($word_or_space->{"Str"}) {
+ $compiled_string .= $word_or_space->{"Str"};
+ }
}
else {
$compiled_string .= ' ';
--
2.39.5