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

refactored WebGUI::Id to use new session api

Browse source
This commit is contained in:
JT Smith 2006-01-11 23:34:02 +00:00
parent 2735385050
commit 925906ca7e
22 changed files with 130 additions and 44 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -148,7 +148,7 @@ sub processPropertiesFromFormPost {
my $until = $self->session->datetime->setToEpoch($self->session->form->process("until"));
$until = $self->get("eventEndDate") unless ($until >= $self->get("eventEndDate"));
my $interval = ($self->session->form->process("interval") < 1) ? 1 : $self->session->form->process("interval");
my $recurringEventId = WebGUI::Id::generate();
my $recurringEventId = $self->session->id->generate();
$self->update({EventsCalendar_recurringId=>$recurringEventId});
my $start = $self->get("eventStartDate");
my $end = $self->get("eventEndDate");

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

@ -511,7 +511,7 @@ sub setCollateral {
my $counter = 0;
my $sql;
if ($properties->{$keyName} eq "new" || $properties->{$keyName} eq "") {
$properties->{$keyName} = WebGUI::Id::generate();
$properties->{$keyName} = $self->session->id->generate();
$sql = "insert into $table (";
my $dbkeys = "";
my $dbvalues = "";

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

@ -431,7 +431,7 @@ sub view {
$self->getUrl.'?calMonthStart='.$prevCalMonthStart.';calMonthEnd='.$prevCalMonthEnd;
$var{'pagination.previousPage'} = '<form method="GET" style="inline;" action="'.
$self->getUrl.'?calMonthStart='.$calMonthStart.
';reload='.WebGUI::Id::generate().'"><a href="'.$self->getUrl.
';reload='.$self->session->id->generate().'"><a href="'.$self->getUrl.
'?calMonthStart='.$prevCalMonthStart.';calMonthEnd='.$prevCalMonthEnd.'">'.
WebGUI::International::get(558,"Asset_EventsCalendar")." ".$monthRangeLength." ".
$monthLabel.'</a>';

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

@ -135,7 +135,7 @@ sub duplicate {
$self = shift;
$newAsset = $self->SUPER::duplicate(shift);
$newSurveyId = WebGUI::Id::generate();
$newSurveyId = $self->session->id->generate();
$newAsset->update({
Survey_id=>$newSurveyId
});
@ -211,7 +211,7 @@ sub getEditForm {
$tabform->getTab('properties')->hidden(
-name => "Survey_id",
-value => ($self->get("Survey_id") || WebGUI::Id::generate())
-value => ($self->get("Survey_id") || $self->session->id->generate())
);
$tabform->getTab('display')->template(
-name => 'templateId',