X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=general%2Finterpolate_fancy;fp=general%2Finterpolate_fancy;h=9eaf045219c4fef24b400a5630130ebddb2d9471;hb=75362f33a0c5b0ba50c4ea9c530ae9c349992604;hp=45208d24d77feec491916c5cbce68f8144aee2bf;hpb=d6c63378cfe2403fae3ff11eea5d5964d3db46c5;p=matthijs%2Fupstream%2Fblosxom-plugins.git

diff --git a/general/interpolate_fancy b/general/interpolate_fancy
index 45208d2..9eaf045 100644
--- a/general/interpolate_fancy
+++ b/general/interpolate_fancy
@@ -176,7 +176,9 @@ sub _action {
   my($plugin, $action, $attr, $content) = @_;
   my $result;
 
-  $content =~ s#<\@((?:\w|::)+?)\.(\w+?)\s+?(.+?)?(?:>(.*?)<\/\@\1\.\2>|\s+?\/>)#&interpolate_fancy::_action($1,$2,$3,$4)#gse;
+  if (defined $content) {
+    $content =~ s#<\@((?:\w|::)+?)\.(\w+?)\s+?(.+?)?(?:>(.*?)<\/\@\1\.\2>|\s+?\/>)#&interpolate_fancy::_action($1,$2,$3,$4)#gse;
+  }
 
   my $attributes = interpolate_fancy::_attributes($attr);