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

Change calls to new to newById across Asset/

Browse source
This commit is contained in:
Colin Kuskie 2010-03-03 16:27:45 -08:00
parent da574279d9
commit 814c2af249
55 changed files with 98 additions and 98 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -1484,7 +1484,7 @@ sub prepareView {
$templateId = "CalendarEvent000000001";
}
my $template = WebGUI::Asset::Template->new($self->session,$templateId);
my $template = WebGUI::Asset::Template->newById($self->session,$templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
@ -2479,11 +2479,11 @@ ENDJS
my $template;
if ($parent) {
$template
= WebGUI::Asset::Template->new($session,$parent->templateIdEventEdit);
= WebGUI::Asset::Template->newById($session,$parent->templateIdEventEdit);
}
else {
$template
= WebGUI::Asset::Template->new($session,"CalendarEventEdit00001");
= WebGUI::Asset::Template->newById($session,"CalendarEventEdit00001");
}

2
lib/WebGUI/Asset/File.pm
View file

@ -375,7 +375,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

4
lib/WebGUI/Asset/File/GalleryFile.pm
View file

@ -386,7 +386,7 @@ sub getCurrentRevisionDate {
return undef unless $revisionDate;
my $asset = WebGUI::Asset->new( $session, $assetId, $class, $revisionDate );
my $asset = WebGUI::Asset->newById( $session, $assetId, $revisionDate );
return undef unless $asset;
@ -583,7 +583,7 @@ sub prepareView {
$self->SUPER::prepareView();
my $template
= WebGUI::Asset::Template->new($self->session, $self->getGallery->templateIdViewFile);
= WebGUI::Asset::Template->newById($self->session, $self->getGallery->templateIdViewFile);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;

2
lib/WebGUI/Asset/MatrixListing.pm
View file

@ -474,7 +474,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->next::method();
my $template = WebGUI::Asset::Template->new($self->session, $self->getParent->get('detailTemplateId'));
my $template = WebGUI::Asset::Template->newById($self->session, $self->getParent->get('detailTemplateId'));
$template->prepare;
$self->{_viewTemplate} = $template;
return undef;

4
lib/WebGUI/Asset/Post.pm
View file

@ -786,7 +786,7 @@ sub getThread {
$threadId=$self->getParent->threadId;
}
}
$self->{_thread} = WebGUI::Asset::Post::Thread->new($self->session, $threadId);
$self->{_thread} = WebGUI::Asset::Post::Thread->newById($self->session, $threadId);
}
return $self->{_thread};
}
@ -1786,7 +1786,7 @@ sub www_showConfirmation {
$collabSystem = $parent->getParent;
}
my $templateId = $collabSystem->postReceivedTemplateId;
my $template = WebGUI::Asset->new($self->session, $templateId);
my $template = WebGUI::Asset->newById($self->session, $templateId);
my %var = (
url => $url,
);

2
lib/WebGUI/Asset/Post/Thread.pm
View file

@ -644,7 +644,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->newByid($self->session, $self->getParent->threadTemplateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->getParent->threadTemplateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/RichEdit.pm
View file

@ -460,7 +460,7 @@ my $sql = "select asset.assetId, assetData.revisionDate from RichEdit left join
my %richEditors;
tie %richEditors, 'Tie::IxHash';
while (my ($id, $version) = $sth->array) {
$richEditors{$id} = WebGUI::Asset::RichEdit->new($session, $id, undef, $version)->getTitle;
$richEditors{$id} = WebGUI::Asset::RichEdit->newById($session, $id, $version)->getTitle;
}
$sth->finish;
return \%richEditors;

2
lib/WebGUI/Asset/Shortcut.pm
View file

@ -809,7 +809,7 @@ on the Asset that is shortcutted.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->get("templateId"));
my $template = WebGUI::Asset::Template->newById($self->session, $self->get("templateId"));
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
my $shortcut = $self->getShortcut;

4
lib/WebGUI/Asset/Sku/Ad.pm
View file

@ -418,7 +418,7 @@ sub prepareManage {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->manageTemplate;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}
@ -435,7 +435,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->purchaseTemplate;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/Donation.pm
View file

@ -139,7 +139,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->templateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/EMSBadge.pm
View file

@ -330,7 +330,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->templateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/EMSTicket.pm
View file

@ -329,7 +329,7 @@ sub getPrice {
my $badgeId = $self->getOptions->{badgeId};
my $ribbonId = $self->session->db->quickScalar("select ribbonAssetId from EMSRegistrantRibbon where badgeId=? limit 1",[$badgeId]);
if (defined $ribbonId && isIn($ribbonId, @ribbonIds)) {
my $ribbon = WebGUI::Asset->new($self->session,$ribbonId,'WebGUI::Asset::Sku::EMSRibbon');
my $ribbon = WebGUI::Asset->newById($self->session, $ribbonId);
$discount = $ribbon->percentageDiscount;
}
else {

2
lib/WebGUI/Asset/Sku/FlatDiscount.pm
View file

@ -194,7 +194,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->templateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/Product.pm
View file

@ -732,7 +732,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->get("templateId"));
my $template = WebGUI::Asset::Template->newById($self->session, $self->get("templateId"));
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/Subscription.pm
View file

@ -481,7 +481,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $templateId = $self->templateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Sku/ThingyRecord.pm
View file

@ -465,7 +465,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->templateIdView );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->templateIdView );
$template->prepare( $self->getMetaDataAsTemplateVariables );
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Story.pm
View file

@ -552,7 +552,7 @@ sub prepareView {
else {
$templateId = $self->getArchive->storyTemplateId;
}
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare;
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Template.pm
View file

@ -434,7 +434,7 @@ sub getList {
my %templates;
tie %templates, 'Tie::IxHash';
TEMPLATE: while (my ($id, $version) = $sth->array) {
my $template = eval { WebGUI::Asset::Template->new($session,$id,$version); };
my $template = eval { WebGUI::Asset::Template->newById($session,$id,$version); };
next TEMPLATE if Exception::Class->caught();
$templates{$id} = $template->getTitle;
}

2
lib/WebGUI/Asset/WikiPage.pm
View file

@ -356,7 +356,7 @@ sub preparePageTemplate {
my $self = shift;
return $self->{_pageTemplate} if $self->{_pageTemplate};
$self->{_pageTemplate} =
WebGUI::Asset::Template->new($self->session, $self->getWiki->pageTemplateId);
WebGUI::Asset::Template->newById($self->session, $self->getWiki->pageTemplateId);
$self->{_pageTemplate}->prepare;
return $self->{_pageTemplate};
}

2
lib/WebGUI/Asset/Wobject/Article.pm
View file

@ -228,7 +228,7 @@ sub prepareView {
if ($self->session->form->process("overrideTemplateId") ne "") {
$templateId = $self->session->form->process("overrideTemplateId");
}
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/Calendar.pm
View file

@ -990,7 +990,7 @@ sub prepareView {
#$self->session->errorHandler->warn("Prepare view ".$view." with template ".$self->get("templateId".$view));
my $template = WebGUI::Asset::Template->new($self->session, $self->get("templateId".$view));
my $template = WebGUI::Asset::Template->newById($self->session, $self->get("templateId".$view));
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/Carousel.pm
View file

@ -140,7 +140,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

4
lib/WebGUI/Asset/Wobject/DataForm.pm
View file

@ -1174,7 +1174,7 @@ Like prepareView, but for the list view of the template.
sub prepareViewList {
my $self = shift;
my $templateId = $self->listTemplateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -1213,7 +1213,7 @@ sub prepareViewForm {
$self->session->style->setLink($self->session->url->extras('tabs/tabs.css'), {"type"=>"text/css"});
$self->session->style->setScript($self->session->url->extras('tabs/tabs.js'), {"type"=>"text/javascript"});
my $templateId = $self->templateId;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/DataTable.pm
View file

@ -207,7 +207,7 @@ sub prepareView {
$self->{_datatable} = $dt;
# Prepare the template
my $template = WebGUI::Asset::Template->new( $session, $self->templateId );
my $template = WebGUI::Asset::Template->newById( $session, $self->templateId );
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

38
lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
View file

@ -411,7 +411,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -501,7 +501,7 @@ sub www_addRibbonToBadge {
my $session = $self->session;
return $session->privilege->insufficient() unless $self->canView;
my $form = $session->form;
my $ribbon = WebGUI::Asset->new($session, $form->get('assetId'), 'WebGUI::Asset::Sku::EMSRibbon');
my $ribbon = WebGUI::Asset->newById($session, $form->get('assetId'));
if (defined $ribbon) {
$ribbon->addToCart({badgeId=>$form->get('badgeId')});
}
@ -523,7 +523,7 @@ sub www_addTicketsToBadge {
my $form = $session->form;
my @ids = $form->param('assetId');
foreach my $id (@ids) {
my $ticket = WebGUI::Asset->new($session, $id, 'WebGUI::Asset::Sku::EMSTicket');
my $ticket = WebGUI::Asset->newById($session, $id);
if (defined $ticket) {
$ticket->addToCart({badgeId=>$form->get('badgeId')});
}
@ -544,7 +544,7 @@ sub www_addTokenToBadge {
my $session = $self->session;
return $session->privilege->insufficient() unless $self->canView;
my $form = $session->form;
my $token = WebGUI::Asset->new($session, $form->get('assetId'), 'WebGUI::Asset::Sku::EMSToken');
my $token = WebGUI::Asset->newById($session, $form->get('assetId'));
if (defined $token) {
my $item = $token->addToCart({badgeId=>$form->get('badgeId')});
$item->setQuantity($form->get('quantity'));
@ -857,7 +857,7 @@ sub www_exportEvents {
# process events
foreach my $id (@{$self->getTickets({returnIds=>1})}) {
my $event = WebGUI::Asset::Sku::EMSTicket->new($session, $id);
my $event = WebGUI::Asset::Sku::EMSTicket->newById($session, $id);
my @export = ();
if (defined $event) {
my $metadata = $event->getEventMetaData;
@ -942,7 +942,7 @@ sub www_getRegistrantAsJson {
# get badge info
my $badgeInfo = $self->getRegistrant($badgeId);
return "{}" unless (exists $badgeInfo->{badgeAssetId});
my $badge = WebGUI::Asset::Sku::EMSBadge->new($session, $badgeInfo->{badgeAssetId});
my $badge = WebGUI::Asset::Sku::EMSBadge->newById($session, $badgeInfo->{badgeAssetId});
$badgeInfo->{title} = $badge->getTitle;
$badgeInfo->{sku} = $badge->sku;
$badgeInfo->{assetId} = $badge->getId;
@ -951,7 +951,7 @@ sub www_getRegistrantAsJson {
# get existing tickets
my $existingTickets = $db->read("select ticketAssetId from EMSRegistrantTicket where badgeId=? and purchaseComplete=1",[$badgeId]);
while (my ($id) = $existingTickets->array) {
my $ticket = WebGUI::Asset::Sku::EMSTicket->new($session, $id);
my $ticket = WebGUI::Asset::Sku::EMSTicket->newById($session, $id);
my $startTime = WebGUI::DateTime->new($ticket->startDate)->set_time_zone($self->timezone);
push(@tickets, {
title => $ticket->getTitle,
@ -968,7 +968,7 @@ sub www_getRegistrantAsJson {
# get existing ribbons
my $existingRibbons = $db->read("select ribbonAssetId from EMSRegistrantRibbon where badgeId=?",[$badgeId]);
while (my ($id) = $existingRibbons->array) {
my $ribbon = WebGUI::Asset::Sku::EMSRibbon->new($session, $id);
my $ribbon = WebGUI::Asset::Sku::EMSRibbon->newById($session, $id);
push(@ribbons, {
title => $ribbon->getTitle,
hasPurchased => 1,
@ -980,7 +980,7 @@ sub www_getRegistrantAsJson {
# get existing tokens
my $existingTokens = $db->read("select tokenAssetId,quantity from EMSRegistrantToken where badgeId=?",[$badgeId]);
while (my ($id, $quantity) = $existingTokens->array) {
my $token = WebGUI::Asset::Sku::EMSToken->new($session, $id);
my $token = WebGUI::Asset::Sku::EMSToken->newById($session, $id);
push(@tokens, {
title => $token->getTitle,
hasPurchased => 1,
@ -1094,7 +1094,7 @@ sub www_getRegistrantsAsJson {
$results{'recordsReturned'} = $badges->rows()+0;
$results{'totalRecords'} = $db->quickScalar('select found_rows()') + 0; ##Convert to numeric
while (my $badgeInfo = $badges->hashRef) {
my $badge = WebGUI::Asset::Sku::EMSBadge->new($session, $badgeInfo->{badgeAssetId});
my $badge = WebGUI::Asset::Sku::EMSBadge->newById($session, $badgeInfo->{badgeAssetId});
unless (defined $badge) {
$session->log->error('badge '.$badgeInfo->{badgeAssetId}.' does not exist.');
next;
@ -1307,7 +1307,7 @@ className='WebGUI::Asset::Sku::EMSTicket' and state='published' and revisionDate
my @badgeGroups = ();
if (defined $badgeId) {
my $assetId = $db->quickScalar("select badgeAssetId from EMSRegistrant where badgeId=?",[$badgeId]);
my $badge = WebGUI::Asset->new($session, $assetId, 'WebGUI::Asset::Sku::EMSBadge');
my $badge = WebGUI::Asset->newById($session, $assetId);
@badgeGroups = split("\n",$badge->relatedBadgeGroups) if (defined $badge);
}
@ -1326,7 +1326,7 @@ className='WebGUI::Asset::Sku::EMSTicket' and state='published' and revisionDate
next;
}
my $ticket = WebGUI::Asset->new($session, $id, 'WebGUI::Asset::Sku::EMSTicket');
my $ticket = WebGUI::Asset->newById($session, $id);
# skip borked tickets
unless (defined $ticket) {
@ -1577,7 +1577,7 @@ $|=1;
$out->print("Processing ".join(",", @row)."\n",1);
my $event = undef;
if (defined $assetIdIndex) {
$event = WebGUI::Asset::Sku::EMSTicket->new($session, $row[$assetIdIndex]);
$event = WebGUI::Asset::Sku::EMSTicket->newById($session, $row[$assetIdIndex]);
}
if (defined $event) {
$out->print('Updating '.$event->getId."\n",1);
@ -1856,7 +1856,7 @@ sub www_manageRegistrant {
}
# badge management
my $badge = WebGUI::Asset::Sku::EMSBadge->new($session, $registrant->{badgeAssetId});
my $badge = WebGUI::Asset::Sku::EMSBadge->newById($session, $registrant->{badgeAssetId});
$output .= q|<p><b style="font-size: 150%; line-height: 150%;">|.$badge->getTitle.q|</b><br />
<a href="|.$self->getUrl('func=printBadge;badgeId='.$badgeId).q|" target="_blank">|.$i18n->get('print').q|</a>
&bull; <a href="|.$self->getUrl('func=refundItem;badgeId='.$badgeId.';transactionItemId='.$registrant->{transactionItemId}).q|">|.$i18n->get('refund').q|</a>
@ -1874,7 +1874,7 @@ sub www_manageRegistrant {
# ticket management
my $existingTickets = $db->read("select ticketAssetId, transactionItemId from EMSRegistrantTicket where badgeId=? and purchaseComplete=1",[$badgeId]);
while (my ($id, $itemId) = $existingTickets->array) {
my $ticket = WebGUI::Asset::Sku::EMSTicket->new($session, $id);
my $ticket = WebGUI::Asset::Sku::EMSTicket->newById($session, $id);
$output .= q|<p><b>|.$ticket->getTitle.q|</b><br />
<a href="|.$self->getUrl('func=printTicket;badgeId='.$badgeId.';ticketAssetId='.$id).q|" target="_blank">|.$i18n->get('print').q|</a>
&bull; <a href="|.$self->getUrl('func=refundItem;badgeId='.$badgeId.';transactionItemId='.$itemId).q|">|.$i18n->get('refund').q|</a>
@ -1884,7 +1884,7 @@ sub www_manageRegistrant {
# ribbon management
my $existingRibbons = $db->read("select ribbonAssetId, transactionItemId from EMSRegistrantRibbon where badgeId=?",[$badgeId]);
while (my ($id, $itemId) = $existingRibbons->array) {
my $ribbon = WebGUI::Asset::Sku::EMSRibbon->new($session, $id);
my $ribbon = WebGUI::Asset::Sku::EMSRibbon->newById($session, $id);
$output .= q|<p><b>|.$ribbon->getTitle.q|</b><br />
<a href="|.$self->getUrl('func=refundItem;badgeId='.$badgeId.';transactionItemId='.$itemId).q|">|.$i18n->get('refund').q|</a>
</p><br />|;
@ -1893,7 +1893,7 @@ sub www_manageRegistrant {
# token management
my $existingTokens = $db->read("select tokenAssetId,quantity,transactionItemIds from EMSRegistrantToken where badgeId=?",[$badgeId]);
while (my ($id, $quantity, $itemIds) = $existingTokens->array) {
my $token = WebGUI::Asset::Sku::EMSToken->new($session, $id);
my $token = WebGUI::Asset::Sku::EMSToken->newById($session, $id);
my @itemIds = split(',', $itemIds);
$output .= q|<p><b>|.$token->getTitle.q|</b> (|.$quantity.q|)<br />
<a href="|.$self->getUrl('func=refundItem;badgeId='.$badgeId.';transactionItemId='.join(';transactionItemId=', @itemIds)).q|">|.$i18n->get('refund').q|</a>
@ -1962,7 +1962,7 @@ sub www_printBadge {
return $session->privilege->insufficient unless ($self->isRegistrationStaff);
my $form = $session->form;
my $registrant = $self->getRegistrant($form->get('badgeId'));
my $badge = WebGUI::Asset::Sku::EMSBadge->new($session, $registrant->{badgeAssetId});
my $badge = WebGUI::Asset::Sku::EMSBadge->newById($session, $registrant->{badgeAssetId});
$registrant->{badgeTitle} = $badge->getTitle;
return $self->processTemplate($registrant,$self->printBadgeTemplateId);
}
@ -1981,7 +1981,7 @@ sub www_printTicket {
return $session->privilege->insufficient unless ($self->isRegistrationStaff);
my $form = $session->form;
my $registrant = $self->getRegistrant($form->get('badgeId'));
my $ticket = WebGUI::Asset::Sku::EMSTicket->new($session, $form->get('ticketAssetId'));
my $ticket = WebGUI::Asset::Sku::EMSTicket->newById($session, $form->get('ticketAssetId'));
$registrant->{ticketTitle} = $ticket->getTitle;
my $startTime = WebGUI::DateTime->new($ticket->startDate)->set_time_zone($self->timezone);
$registrant->{ticketStart} = $startTime->strftime('%F %R');

2
lib/WebGUI/Asset/Wobject/Folder.pm
View file

@ -165,7 +165,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

6
lib/WebGUI/Asset/Wobject/Gallery.pm
View file

@ -999,7 +999,7 @@ Prepare the template for listing multiple albums.
sub prepareViewListAlbums {
my $self = shift;
my $template
= WebGUI::Asset::Template->new($self->session, $self->templateIdListAlbums);
= WebGUI::Asset::Template->newById($self->session, $self->templateIdListAlbums);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -1204,7 +1204,7 @@ sub www_listAlbumsRss {
my $var = $self->getTemplateVars;
for my $assetId ( @{ $self->getAlbumIds } ) {
my $asset = WebGUI::Asset->new( $session, $assetId, 'WebGUI::Asset::Wobject::GalleryAlbum');
my $asset = WebGUI::Asset->newById( $session, $assetId);
my $assetVar = $asset->getTemplateVars;
# Fix URLs
@ -1332,7 +1332,7 @@ sub www_listAlbumsService {
if ($count > $pageNumber * 100 - 1) { # skip high page numbers
last;
}
my $asset = WebGUI::Asset->new( $session, $assetId, 'WebGUI::Asset::Wobject::GalleryAlbum' );
my $asset = WebGUI::Asset->newById( $session, $assetId);
if (defined $asset) {
if ($asset->canView) {
push @assets, {

8
lib/WebGUI/Asset/Wobject/GalleryAlbum.pm
View file

@ -376,7 +376,7 @@ sub getCurrentRevisionDate {
return undef unless $revisionDate;
my $asset = WebGUI::Asset->new( $session, $assetId, $class, $revisionDate );
my $asset = WebGUI::Asset->newById( $session, $assetId, $revisionDate );
return undef unless $asset;
@ -663,7 +663,7 @@ sub prepareView {
my $templateId = $self->getParent->templateIdViewAlbum;
my $template
= WebGUI::Asset::Template->new($self->session, $templateId);
= WebGUI::Asset::Template->newById($self->session, $templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -1337,7 +1337,7 @@ sub www_slideshow {
$self->appendTemplateVarsFileLoop( $self->{_templateVars}, $self->getFileIds );
my $templateId = $self->getParent->templateIdViewSlideshow;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_preparedTemplate} = $template;
@ -1360,7 +1360,7 @@ sub www_thumbnails {
$self->appendTemplateVarsFileLoop($self->{_templateVars}, $self->getFileIds);
my $templateId = $self->getParent->templateIdViewThumbnails;
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_preparedTemplate} = $template;

2
lib/WebGUI/Asset/Wobject/HttpProxy.pm
View file

@ -226,7 +226,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/InOutBoard.pm
View file

@ -117,7 +117,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->inOutTemplateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->inOutTemplateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

6
lib/WebGUI/Asset/Wobject/Map.pm
View file

@ -226,7 +226,7 @@ sub getEditPointTemplate {
if ( !$self->{_editPointTemplate} ) {
my $templateId = $self->templateIdEditPoint;
my $template
= WebGUI::Asset::Template->new( $self->session, $templateId );
= WebGUI::Asset::Template->newById( $self->session, $templateId );
$template->prepare;
$self->{_editPointTemplate} = $template;
}
@ -249,7 +249,7 @@ sub getViewPointTemplate {
if ( !$self->{_viewPointTemplate} ) {
my $templateId = $self->templateIdViewPoint;
my $template
= WebGUI::Asset::Template->new( $self->session, $templateId );
= WebGUI::Asset::Template->newById( $self->session, $templateId );
$self->{_viewPointTemplate} = $template;
}
@ -319,7 +319,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->templateIdView );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->templateIdView );
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

4
lib/WebGUI/Asset/Wobject/Matrix.pm
View file

@ -569,7 +569,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -1263,7 +1263,7 @@ sub www_getCompareListData {
foreach my $listingId (@listingIds){
$listingId =~ s/_____/-/g;
my $listing = WebGUI::Asset::MatrixListing->new($session,$listingId);
my $listing = WebGUI::Asset::MatrixListing->newById($session,$listingId);
$listing->incrementCounter("compares");
my $listingId_safe = $listingId;
$listingId_safe =~ s/-/_____/g;

2
lib/WebGUI/Asset/Wobject/MessageBoard.pm
View file

@ -51,7 +51,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/MultiSearch.pm
View file

@ -62,7 +62,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/Navigation.pm
View file

@ -357,7 +357,7 @@ Extend the superclass to add metadata and to preprocess the template.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->get("templateId"));
my $template = WebGUI::Asset::Template->newById($self->session, $self->get("templateId"));
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/Poll.pm
View file

@ -337,7 +337,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->get("templateId"));
my $template = WebGUI::Asset::Template->newById($self->session, $self->get("templateId"));
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/ProjectManager.pm
View file

@ -592,7 +592,7 @@ sub i18n {
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->projectDashboardTemplateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->projectDashboardTemplateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/SQLReport.pm
View file

@ -525,7 +525,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

4
lib/WebGUI/Asset/Wobject/Search.pm
View file

@ -99,7 +99,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -179,7 +179,7 @@ sub view {
|| $user->isInGroup($data->{groupIdEdit})
);
my $asset = WebGUI::Asset->new($session, $data->{assetId}, $data->{className});
my $asset = WebGUI::Asset->newById($session, $data->{assetId});
if (defined $asset) {
my $properties = $asset->get;
if ($self->useContainers) {

2
lib/WebGUI/Asset/Wobject/Shelf.pm
View file

@ -239,7 +239,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/StockData.pm
View file

@ -297,7 +297,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

6
lib/WebGUI/Asset/Wobject/StoryArchive.pm
View file

@ -238,7 +238,7 @@ sub exportAssetCollateral {
limit => 50, ##This is based on the tagcloud setting
});
my $listTemplate = WebGUI::Asset->new($session, $self->keywordListTemplateId, 'WebGUI::Asset::Template');
my $listTemplate = WebGUI::Asset->newById($session, $self->keywordListTemplateId);
foreach my $keyword (@{ $keywords }) {
##Keywords may not be URL safe, so urlize them
my $keyword_url = $self->getKeywordFilename($keyword);
@ -427,7 +427,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -558,7 +558,7 @@ sub viewTemplateVariables {
##Only build objects for the assets that we need
STORY: foreach my $storyId (@{ $storyIds }) {
my $story = WebGUI::Asset->new($session, $storyId->{assetId}, $storyId->{className}, $storyId->{revisionDate});
my $story = WebGUI::Asset->newById($session, $storyId->{assetId}, $storyId->{revisionDate});
next STORY unless $story;
my $creationDate = $story->creationDate;
my ($creationDay,undef) = $session->datetime->dayStartEnd($creationDate);

8
lib/WebGUI/Asset/Wobject/StoryTopic.pm
View file

@ -98,7 +98,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},
@ -164,7 +164,7 @@ sub viewTemplateVariables {
##Only build objects for the assets that we need
STORY: foreach my $storyId (@{ $storyIds }) {
my $story = WebGUI::Asset->new($session, $storyId->{assetId}, $storyId->{className}, $storyId->{revisionDate});
my $story = WebGUI::Asset->newById($session, $storyId->{assetId}, $storyId->{revisionDate});
next STORY unless $story;
my $storyVars = {
url => ( $exporting
@ -186,7 +186,7 @@ sub viewTemplateVariables {
my $topStoryData = $storyIds->[0];
shift @{ $var->{story_loop} };
##Note, this could have saved from the loop above, but this looks more clean and encapsulated to me.
my $topStory = WebGUI::Asset->new($session, $topStoryData->{assetId}, $topStoryData->{className}, $topStoryData->{revisionDate});
my $topStory = WebGUI::Asset->newById($session, $topStoryData->{assetId}, $topStoryData->{revisionDate});
$var->{topStoryTitle} = $topStory->getTitle;
$var->{topStorySubtitle} = $topStory->subtitle;
$var->{topStoryUrl} = $session->url->append($self->getUrl, 'func=viewStory;assetId='.$topStoryData->{assetId}),
@ -246,7 +246,7 @@ sub www_viewStory {
my $storyId = $session->form->get('assetId');
my $story;
if ($storyId) {
$story = WebGUI::Asset->new($session, $storyId);
$story = WebGUI::Asset->newById($session, $storyId);
}
if (! $story) {
my $notFound = WebGUI::Asset->getNotFound($session);

2
lib/WebGUI/Asset/Wobject/Survey/ExpressionEngine.pm
View file

@ -506,7 +506,7 @@ sub run {
# Instantiate the asset to check it is a Survey instance, and to grab its assetId
if ( $session->id->valid($asset_spec) ) {
$asset = WebGUI::Asset->new( $session, $asset_spec );
$asset = WebGUI::Asset->newById( $session, $asset_spec );
}
if ( !$asset ) {
$asset = WebGUI::Asset->newByUrl( $session, $asset_spec );

2
lib/WebGUI/Asset/Wobject/Survey/Test.pm
View file

@ -127,7 +127,7 @@ sub run {
}
my $assetId = $self->get('assetId');
my $survey = WebGUI::Asset::Wobject::Survey->new($session, $assetId);
my $survey = WebGUI::Asset::Wobject::Survey->newById($session, $assetId);
if (!$survey || !$survey->isa('WebGUI::Asset::Wobject::Survey') ) {
return { tap => "Bail Out! Unable to instantiate Survey using assetId: $assetId" };
}

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

@ -281,7 +281,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->next::method;
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

4
lib/WebGUI/Asset/Wobject/Thingy.pm
View file

@ -1229,7 +1229,7 @@ sub importAssetCollateralData {
my $id = $data->{properties}{assetId};
my $class = $data->{properties}{className};
my $version = $data->{properties}{revisionDate};
my $assetExists = WebGUI::Asset->new($self->session, $id, $class, $version);
my $assetExists = WebGUI::Asset->newById($self->session, $id, $version);
$error->info("Importing Things for Thingy ".$data->{properties}{title});
my @importThings;
@ -1298,7 +1298,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/TimeTracking.pm
View file

@ -78,7 +78,7 @@ sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template;
$template = WebGUI::Asset::Template->new($self->session, $self->userViewTemplateId);
$template = WebGUI::Asset::Template->newById($self->session, $self->userViewTemplateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/UserList.pm
View file

@ -327,7 +327,7 @@ sub prepareView {
if ($self->session->form->process("overrideTemplateId") ne "") {
$templateId = $self->session->form->process("overrideTemplateId");
}
my $template = WebGUI::Asset::Template->new($self->session, $templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/WeatherData.pm
View file

@ -83,7 +83,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new($self->session, $self->templateId);
my $template = WebGUI::Asset::Template->newById($self->session, $self->templateId);
if (!$template) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

10
lib/WebGUI/Asset/Wobject/WikiMaster.pm
View file

@ -263,14 +263,14 @@ sub appendRecentChanges {
my $self = shift;
my $var = shift;
my $limit = shift || $self->recentChangesCount || 50;
my $revisions = $self->session->db->read("select asset.assetId, assetData.revisionDate, asset.className
my $revisions = $self->session->db->read("select asset.assetId, assetData.revisionDate
from asset left join assetData using (assetId) where asset.parentId=? and asset.className
like ? and status='approved' order by assetData.revisionDate desc limit ?", [$self->getId,
"WebGUI::Asset::WikiPage%", $limit]);
while (my ($id, $version, $class) = $revisions->array) {
my $asset = WebGUI::Asset->new($self->session, $id, $class, $version);
while (my ($id, $version) = $revisions->array) {
my $asset = WebGUI::Asset->newById($self->session, $id, $version);
unless (defined $asset) {
$self->session->errorHandler->error("Asset $id $class $version could not be instanciated.");
$self->session->errorHandler->error("Asset $id $version could not be instanciated.");
next;
}
my $user = WebGUI::User->new($self->session, $asset->actionTakenBy);
@ -533,7 +533,7 @@ sub prepareView {
my $self = shift;
$self->next::method;
$self->{_frontPageTemplate} =
WebGUI::Asset::Template->new($self->session, $self->frontPageTemplateId);
WebGUI::Asset::Template->newById($self->session, $self->frontPageTemplateId);
if (!$self->{_frontPageTemplate}) {
WebGUI::Error::ObjectNotFound::Template->throw(
error => qq{Template not found},

2
lib/WebGUI/Asset/Wobject/_NewWobject.skeleton
View file

@ -120,7 +120,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->get("templateId") );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->get("templateId") );
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/Wobject/_NewWobject.skeleton.minimal
View file

@ -65,7 +65,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->get("templateIdView") );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->get("templateIdView") );
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/_NewAsset.skeleton
View file

@ -160,7 +160,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->get("templateId") );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->get("templateId") );
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}

2
lib/WebGUI/Asset/_NewAsset.skeleton.minimal
View file

@ -85,7 +85,7 @@ See WebGUI::Asset::prepareView() for details.
sub prepareView {
my $self = shift;
$self->SUPER::prepareView();
my $template = WebGUI::Asset::Template->new( $self->session, $self->get("templateIdView") );
my $template = WebGUI::Asset::Template->newById( $self->session, $self->get("templateIdView") );
$template->prepare($self->getMetaDataAsTemplateVariables);
$self->{_viewTemplate} = $template;
}