From: <mn...@us...> - 2010-04-01 21:06:23
|
Author: mnodine Date: 2010-04-01 23:06:12 +0200 (Thu, 01 Apr 2010) New Revision: 6298 Modified: trunk/prest/lib/Text/Restructured/Writer/latex.wrt Log: Fixed a potential undefined variable warning Modified: trunk/prest/lib/Text/Restructured/Writer/latex.wrt =================================================================== --- trunk/prest/lib/Text/Restructured/Writer/latex.wrt 2010-03-31 08:25:24 UTC (rev 6297) +++ trunk/prest/lib/Text/Restructured/Writer/latex.wrt 2010-04-01 21:06:12 UTC (rev 6298) @@ -1255,7 +1255,7 @@ if ($dom->first->tag eq 'decoration') { $decoration = $dom->first->{val}; shift @{$dom->{content}}; - $str = join('', map($_->{val}, @{$dom->{content}})); + $str = join('', map($_->{val} || '', @{$dom->{content}})); } my @doc = ("\\documentclass" . ($documentclass_opts ne '' ? "[$documentclass_opts]" : '') . |