From 6c0688add241e4d5b870d155511940130bb964b1 Mon Sep 17 00:00:00 2001 From: Graham Knop Date: Wed, 12 Nov 2008 01:17:22 +0000 Subject: [PATCH] clean up pod, syntax, warning problems --- lib/WebGUI/Asset/Event.pm | 1 - lib/WebGUI/Asset/Wobject/Survey.pm | 1 + lib/WebGUI/Asset/Wobject/SyndicatedContent.pm | 16 ++++++---------- 3 files changed, 7 insertions(+), 11 deletions(-) diff --git a/lib/WebGUI/Asset/Event.pm b/lib/WebGUI/Asset/Event.pm index fc7a17b19..2a875a533 100644 --- a/lib/WebGUI/Asset/Event.pm +++ b/lib/WebGUI/Asset/Event.pm @@ -1494,7 +1494,6 @@ sub processPropertiesFromFormPost { # Since we may be adding more events, set out version tag to be active if needed # Leave the original version tag available, we will need to reactivate it before returning - warn "trying to activate version tag\n"; my $activeVersionTag = WebGUI::VersionTag->getWorking($session, 'nocreate'); # if our version tag is active, we don't need a new one, and don't need to reactivate anything later if ($activeVersionTag && $activeVersionTag->getId eq $self->get('tagId')) { diff --git a/lib/WebGUI/Asset/Wobject/Survey.pm b/lib/WebGUI/Asset/Wobject/Survey.pm index ac4858689..036c88a05 100644 --- a/lib/WebGUI/Asset/Wobject/Survey.pm +++ b/lib/WebGUI/Asset/Wobject/Survey.pm @@ -256,6 +256,7 @@ eval{ Saves the survey collateral to the DB =cut + sub survey{ return shift->{survey}; } sub littleBuddy{ return shift->{survey}; } sub allyourbases{ return shift->{survey}; } diff --git a/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm b/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm index 2b4b17132..6da17a5fb 100644 --- a/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm +++ b/lib/WebGUI/Asset/Wobject/SyndicatedContent.pm @@ -407,9 +407,9 @@ Deprecated. Use www_viewRss() instead. =cut -sub www_viewRSS10 { +sub www_viewRSS090 { my $self = shift; - return $self->www_viewRdf; + return $self->www_viewRss; } #------------------------------------------------------------------- @@ -420,9 +420,9 @@ Deprecated. Use www_viewRss() instead. =cut -sub www_viewRSS10 { +sub www_viewRSS091 { my $self = shift; - return $self->www_viewRdf; + return $self->www_viewRss; } #------------------------------------------------------------------- @@ -446,14 +446,10 @@ Deprecated. Use www_viewRss() instead. =cut -sub www_viewRSS10 { +sub www_viewRSS20 { my $self = shift; - return $self->www_viewRdf; + return $self->www_viewRss; } - - - - 1;