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

Added Real Objects Edit-On Pro integration.

Browse source
This commit is contained in:
JT Smith 2002-05-07 01:51:07 +00:00
parent 0d32a1b901
commit 03599c4e83
16 changed files with 259 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Operation/Settings.pm
View file

@ -165,10 +165,11 @@ sub www_editMailSettingsSave {
#-------------------------------------------------------------------
sub www_editMiscSettings {
my ($output, %notFoundPage, %criticalError, %htmlFilter, $f);
my ($output, %notFoundPage, %criticalError, %htmlFilter, %editor, $f);
%htmlFilter = ('none'=>WebGUI::International::get(420), 'most'=>WebGUI::International::get(421), 'all'=>WebGUI::International::get(419));
%criticalError = ('debug'=>WebGUI::International::get(414), 'friendly'=>WebGUI::International::get(415));
%notFoundPage = (1=>WebGUI::International::get(136), 4=>WebGUI::International::get(137));
%editor = ('built-in'=>WebGUI::International::get(495), 'edit-on-pro'=>WebGUI::International::get(494));
if (WebGUI::Privilege::isInGroup(3)) {
$output .= helpIcon(24);
$output .= '<h1>'.WebGUI::International::get(140).'</h1>';
@ -183,6 +184,7 @@ sub www_editMiscSettings {
$f->integer("textAreaRows",WebGUI::International::get(463),$session{setting}{textAreaRows});
$f->integer("textAreaCols",WebGUI::International::get(464),$session{setting}{textAreaCols});
$f->integer("textBoxSize",WebGUI::International::get(465),$session{setting}{textBoxSize});
$f->select("richEditor",\%editor,WebGUI::International::get(496),[$session{setting}{richEditor}]);
$f->submit;
$output .= $f->print;
} else {
@ -203,6 +205,7 @@ sub www_editMiscSettingsSave {
_saveSetting("textAreaRows");
_saveSetting("textAreaCols");
_saveSetting("textBoxSize");
_saveSetting("richEditor");
return www_manageSettings();
} else {
return WebGUI::Privilege::adminOnly();