From bba978f2a1a91e525f38c826bd3077c300e4e454 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Tue, 27 Jul 2010 11:50:27 -0700 Subject: [PATCH] Use the correct end tag identifier character. --- lib/WebGUI/Macro/FilePump.pm | 2 +- t/Macro/FilePump.t | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/WebGUI/Macro/FilePump.pm b/lib/WebGUI/Macro/FilePump.pm index 4f5105739..2cb0eed86 100644 --- a/lib/WebGUI/Macro/FilePump.pm +++ b/lib/WebGUI/Macro/FilePump.pm @@ -195,7 +195,7 @@ on your print CSS tag. sub linkTag { my ($session, $url, $extras) = @_; - my $template = qq|\n|; + my $template = qq|\n|; return sprintf $template, $url; } diff --git a/t/Macro/FilePump.t b/t/Macro/FilePump.t index 148387f85..14c04f11e 100644 --- a/t/Macro/FilePump.t +++ b/t/Macro/FilePump.t @@ -83,7 +83,7 @@ is( ); is( WebGUI::Macro::FilePump::process($session, 'test bundle', 'CSS'), - sprintf(qq|\n|, + sprintf(qq|\n|, join('/', $uploadsURL, 'filepump', $bundle->bundleUrl . '.'. $bundle->get('lastBuild'), $bundle->bundleUrl.'.css'), ), '... check CSS file, normal mode' @@ -104,7 +104,7 @@ is( ); is( WebGUI::Macro::FilePump::process($session, 'test bundle', 'CSS'), - sprintf(qq|\n|, $fileAsset->getUrl), + sprintf(qq|\n|, $fileAsset->getUrl), '... check CSS file, normal mode' ); is(