oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

clean up pod, syntax, warning problems

Browse source
This commit is contained in:
Graham Knop 2008-11-12 01:17:22 +00:00
parent b65c907040
commit 6c0688add2
3 changed files with 7 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/WebGUI/Asset/Event.pm
View file

@ -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')) {

1
lib/WebGUI/Asset/Wobject/Survey.pm
View file

@ -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}; }

16
lib/WebGUI/Asset/Wobject/SyndicatedContent.pm
View file

@ -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;