From d2db70815838aab0f621cbbbe16056ce5c6cb458 Mon Sep 17 00:00:00 2001 From: Angel Ortega Date: Fri, 19 Sep 2008 17:51:19 +0200 Subject: [PATCH] Ensure that always have a string value. --- Artemus.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/Artemus.pm b/Artemus.pm index ae48bae..9982933 100644 --- a/Artemus.pm +++ b/Artemus.pm @@ -705,10 +705,12 @@ sub _process_do } } + $text ||= ''; + # do the recursivity # if params are not to be cached, # use $key instead of $found - $text = $ah->_process_do($text, $found); + $text = $ah->_process_do($text, $found) || ''; # make the substitution $data =~ s/{-\Q$found\E}/$text/; -- 2.11.4.GIT