Added scratch filter to groups.
This commit is contained in:
parent
13e1a253dd
commit
4f3859724b
7 changed files with 90 additions and 28 deletions
|
|
@ -141,6 +141,11 @@ sub www_editGroup {
|
|||
-value=>$g->ipFilter,
|
||||
-label=>WebGUI::International::get(857)
|
||||
);
|
||||
$f->textarea(
|
||||
-name=>"scratchFilter",
|
||||
-value=>$g->scratchFilter,
|
||||
-label=>WebGUI::International::get(945)
|
||||
);
|
||||
$f->submit;
|
||||
$output .= $f->print;
|
||||
return _submenu($output);
|
||||
|
|
@ -155,6 +160,7 @@ sub www_editGroupSave {
|
|||
$g->expireOffset(WebGUI::DateTime::intervalToSeconds($session{form}{expireOffset_interval},$session{form}{expireOffset_units}));
|
||||
$g->karmaThreshold($session{form}{karmaThreshold});
|
||||
$g->ipFilter($session{form}{ipFilter});
|
||||
$g->scratchFilter($session{form}{scratchFilter});
|
||||
$g->expireNotify($session{form}{expireNotify});
|
||||
$g->expireNotifyOffset($session{form}{expireNotifyOffset});
|
||||
$g->expireNotifyMessage($session{form}{expireNotifyMessage});
|
||||
|
|
|
|||
|
|
@ -19,12 +19,14 @@ our @EXPORT = qw(&www_setScratch &www_deleteScratch);
|
|||
|
||||
#-------------------------------------------------------------------
|
||||
sub www_deleteScratch {
|
||||
WebGUI::Session::deleteScratch("www_".$session{user}{scratchName});
|
||||
WebGUI::Session::deleteScratch("www_".$session{form}{scratchName});
|
||||
return "";
|
||||
}
|
||||
|
||||
#-------------------------------------------------------------------
|
||||
sub www_setScratch {
|
||||
WebGUI::Session::setScratch("www_".$session{form}{scratchName},$session{form}{scratchValue});
|
||||
return "";
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue