fixed [ 1265788 ] SyndicatedContent *not working* in 6.7.x
This commit is contained in:
parent
3e587762be
commit
2372905928
4 changed files with 12 additions and 11 deletions
|
|
@ -1,4 +1,5 @@
|
||||||
6.7.2
|
6.7.2
|
||||||
|
- fix [ 1265788 ] SyndicatedContent *not working* in 6.7.x
|
||||||
|
|
||||||
|
|
||||||
6.7.1
|
6.7.1
|
||||||
|
|
|
||||||
|
|
@ -134,14 +134,7 @@ sub toHtml {
|
||||||
WebGUI::Style::setScript($session{config}{extrasURL}.'/calendar/calendar-setup.js',{ type=>'text/javascript' });
|
WebGUI::Style::setScript($session{config}{extrasURL}.'/calendar/calendar-setup.js',{ type=>'text/javascript' });
|
||||||
WebGUI::Style::setLink($session{config}{extrasURL}.'/calendar/calendar-win2k-1.css', { rel=>"stylesheet", type=>"text/css", media=>"all" });
|
WebGUI::Style::setLink($session{config}{extrasURL}.'/calendar/calendar-win2k-1.css', { rel=>"stylesheet", type=>"text/css", media=>"all" });
|
||||||
my $mondayFirst = $session{user}{firstDayOfWeek} ? "true" : "false";
|
my $mondayFirst = $session{user}{firstDayOfWeek} ? "true" : "false";
|
||||||
return WebGUI::Form::Text->new(
|
return $self->SUPER::toHtml. '<script type="text/javascript">
|
||||||
name=>$self->{name},
|
|
||||||
value=>$self->{value},
|
|
||||||
extras=>$self->{extras},
|
|
||||||
size=>$self->{size},
|
|
||||||
maxlength=>$self->{maxlength},
|
|
||||||
id=>$self->{id}
|
|
||||||
)->toHtml . '<script type="text/javascript">
|
|
||||||
Calendar.setup({
|
Calendar.setup({
|
||||||
inputField : "'.$self->{id}.'",
|
inputField : "'.$self->{id}.'",
|
||||||
ifFormat : "%Y-%m-%d",
|
ifFormat : "%Y-%m-%d",
|
||||||
|
|
|
||||||
|
|
@ -117,13 +117,17 @@ sub toHtml {
|
||||||
'months'=>WebGUI::International::get(702),
|
'months'=>WebGUI::International::get(702),
|
||||||
'years'=>WebGUI::International::get(703));
|
'years'=>WebGUI::International::get(703));
|
||||||
my ($interval, $units) = WebGUI::DateTime::secondsToInterval($self->{value});
|
my ($interval, $units) = WebGUI::DateTime::secondsToInterval($self->{value});
|
||||||
my $out = WebGUI::Form::Integer->new(
|
# not sure why, but these things need to be defined like this or
|
||||||
|
# they fail under some circumstnaces
|
||||||
|
my $cmd = "WebGUI::Form::Integer";
|
||||||
|
my $out = $cmd->new(
|
||||||
name=>$self->{name}."_interval",
|
name=>$self->{name}."_interval",
|
||||||
value=>$interval,
|
value=>$interval,
|
||||||
extras=>$self->{extras},
|
extras=>$self->{extras},
|
||||||
id=>$self->{id}."_interval",
|
id=>$self->{id}."_interval",
|
||||||
)->toHtml;
|
)->toHtml;
|
||||||
$out .= WebGUI::Form::SelectList->new(
|
$cmd = "WebGUI::Form::SelectList";
|
||||||
|
$out .= $cmd->new(
|
||||||
options=>\%units,
|
options=>\%units,
|
||||||
name=>$self->{name}."_units",
|
name=>$self->{name}."_units",
|
||||||
id=>$self->{id}."_units",
|
id=>$self->{id}."_units",
|
||||||
|
|
|
||||||
|
|
@ -112,7 +112,10 @@ sub toHtml {
|
||||||
delete $templateList->{$assetId};
|
delete $templateList->{$assetId};
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
my $selectList = WebGUI::Form::SelectList->new(
|
# not sure why, but for some reason this fails under certain circumstances unless defined
|
||||||
|
# in this manner. The syndicated content asset is an example where it fails.
|
||||||
|
my $cmd = "WebGUI::Form::SelectList";
|
||||||
|
my $selectList = $cmd->new(
|
||||||
id=>$self->{id},
|
id=>$self->{id},
|
||||||
name=>$self->{name},
|
name=>$self->{name},
|
||||||
options=>$templateList,
|
options=>$templateList,
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue