From: Matthijs Kooijman <matthijs@stdin.nl>
Date: Mon, 4 Jan 2010 20:02:43 +0000 (+0100)
Subject: Only mangle $blosxom::title and body if defined.
X-Git-Url: https://git.stderr.nl/gitweb?p=matthijs%2Fupstream%2Fblosxom-plugins.git;a=commitdiff_plain;h=d6c63378cfe2403fae3ff11eea5d5964d3db46c5

Only mangle $blosxom::title and body if defined.

This fixes a warning when the do_interpolate route is called to
interpolate non-story templates.
---

diff --git a/general/interpolate_fancy b/general/interpolate_fancy
index 4b8b759..45208d2 100644
--- a/general/interpolate_fancy
+++ b/general/interpolate_fancy
@@ -109,8 +109,8 @@ sub do_interpolate {
     # Halt recursive interpolation of story $body
     # by mangling interpolation tags (to be unmangled in a moment)
     unless ($recurse_into_story) {
-      $blosxom::title =~ s/<(\@|\??\$)/<#INTERPOLATE_FANCY_DEFANG#$1/gsi;
-      $blosxom::body =~ s/<(\@|\??\$)/<#INTERPOLATE_FANCY_DEFANG#$1/gsi;
+      $blosxom::title =~ s/<(\@|\??\$)/<#INTERPOLATE_FANCY_DEFANG#$1/gsi if defined $blosxom::title;
+      $blosxom::body =~ s/<(\@|\??\$)/<#INTERPOLATE_FANCY_DEFANG#$1/gsi if defined $blosxom::body;
     }
 
     my $template = shift;