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

added hide option to layout

Browse source 
fixed typo in events calendar
added context menu stuff that i forgot to check in
added richEditId option to the HTMLArea method in HTMLForm
This commit is contained in:
JT Smith 2005-05-03 19:14:58 +00:00
parent c1303373f0
commit 10285b71cf
8 changed files with 202 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/WebGUI/HTMLForm.pm
View file

@ -1454,13 +1454,17 @@ The UI level for this field. See the WebGUI developer's site for details. Defaul
If no value is specified, this will be used.
=head3 richEditId
An asset Id of a rich editor config. Defaults to the default rich editor in the settings.
=cut
sub HTMLArea {
my ($output);
my ($self, @p) = @_;
my ($name, $label, $value, $subtext, $extras, $wrap, $rows, $columns, $uiLevel, $defaultValue) =
rearrange([qw(name label value subtext extras wrap rows columns uiLevel defaultValue)], @p);
my ($name, $label, $value, $subtext, $extras, $wrap, $rows, $columns, $uiLevel, $defaultValue, $richEditId) =
rearrange([qw(name label value subtext extras wrap rows columns uiLevel defaultValue richEditId)], @p);
if (_uiLevelChecksOut($uiLevel)) {
$output = WebGUI::Form::HTMLArea({
"name"=>$name,
@ -1469,7 +1473,8 @@ sub HTMLArea {
"columns"=>$columns,
"rows"=>$rows,
"extras"=>$extras,
defaultValue=>$defaultValue
defaultValue=>$defaultValue,
richEditId=>$richEditId
});
$output .= _subtext($subtext);
$output = $self->_tableFormRow($label,$output);