From 097de28bd0d5f1a3a5fb04476591c259cc8ba6f0 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Thu, 29 Jan 2009 23:38:14 +0000 Subject: [PATCH] Fix a perl syntax error, and use if/elsif/else instead of cascaded if, since the 2nd if would always win. --- lib/WebGUI/Asset/Post.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Asset/Post.pm b/lib/WebGUI/Asset/Post.pm index fa8669fe2..5b8d35aac 100644 --- a/lib/WebGUI/Asset/Post.pm +++ b/lib/WebGUI/Asset/Post.pm @@ -552,9 +552,11 @@ sub getSynopsisAndContent { my @content; if( $body =~ /\^\-\;/ ) { @content = split(/\^\-\;/, $body ,2); - if( $body =~ /

/ ) { + } + elsif( $body =~ /

/ ) { @content = WebGUI::HTML::splitTag($body); - } else { + } + else { @content = split("\n",$body); } shift @content if $content[0] =~ /^\s*$/;