From 84716b87ed55fcf140a95177440825458bf81356 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Wed, 28 Feb 2007 23:17:20 +0000 Subject: [PATCH] set explicit check for html,head and body tags to useEmptyStyle to keep an eye on the template --- t/Session/Style.t | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/t/Session/Style.t b/t/Session/Style.t index dbd0fa646..731252554 100644 --- a/t/Session/Style.t +++ b/t/Session/Style.t @@ -19,7 +19,7 @@ use WebGUI::Asset; use WebGUI::VersionTag; use WebGUI; -use Test::More tests => 56; # increment this value for each test you create +use Test::More tests => 57; # increment this value for each test you create use Test::Deep; my $session = WebGUI::Test->session; @@ -228,6 +228,10 @@ like($styled, qr/PERSONAL STYLE TEMPLATE/, 'process: personalStyleTemplate overrides submitted template'); +unlike($styled, +qr{(?i)}, +'useEmptyStyle does not have html, head or body tags'); + my $head = $styled; $head =~ s/(^HEAD=.+$)/$1/s;