diff --git a/lib/WebGUI/Help/WebGUI.pm b/lib/WebGUI/Help/WebGUI.pm index 1be7292f5..60f31978c 100644 --- a/lib/WebGUI/Help/WebGUI.pm +++ b/lib/WebGUI/Help/WebGUI.pm @@ -466,6 +466,44 @@ our $HELP = { }, ] }, + 'edit user karma' => { + title => '558', + body => 'edit user karma body', + fields => [ + { + title => '556', + description => '556 description', + namespace => 'WebGUI', + }, + { + title => '557', + description => '557 description', + namespace => 'WebGUI', + }, + ], + related => [ + { + tag => 'article add/edit', + namespace => 'Asset_Article' + }, + { + tag => 'group add/edit', + namespace => 'WebGUI' + }, + { + tag => 'message board add/edit', + namespace => 'Asset_MessageBoard' + }, + { + tag => 'poll add/edit', + namespace => 'Asset_Poll' + }, + { + tag => 'settings', + namespace => 'WebGUI' + }, + ] + }, 'clipboard empty' => { title => '968', body => '969', diff --git a/lib/WebGUI/Operation/User.pm b/lib/WebGUI/Operation/User.pm index a6bd59bdf..2a0b010a7 100644 --- a/lib/WebGUI/Operation/User.pm +++ b/lib/WebGUI/Operation/User.pm @@ -394,13 +394,27 @@ sub www_editUserKarma { return WebGUI::Privilege::adminOnly() unless (WebGUI::Grouping::isInGroup(3)); my ($output, $f, $a, %user, %data, $method, $values, $category, $label, $default, $previousCategory); $f = WebGUI::HTMLForm->new; - $f->hidden("op","editUserKarmaSave"); - $f->hidden("uid",$session{form}{uid}); - $f->integer("amount",WebGUI::International::get(556)); - $f->text("description",WebGUI::International::get(557)); + $f->hidden( + -name => "op", + -value => "editUserKarmaSave", + ); + $f->hidden( + -name => "uid", + -value => $session{form}{uid}, + ); + $f->integer( + -name => "amount", + -label => WebGUI::International::get(556), + -hoverHelp => WebGUI::International::get('556 description'), + ); + $f->text( + -name => "description", + -label => WebGUI::International::get(557), + -hoverHelp => WebGUI::International::get('557 description'), + ); $f->submit; $output .= $f->print; - return _submenu($output,'558',"karma using"); + return _submenu($output,'558',"edit user karma"); } #------------------------------------------------------------------- diff --git a/lib/WebGUI/i18n/English/WebGUI.pm b/lib/WebGUI/i18n/English/WebGUI.pm index 29bb44eaf..f81c792eb 100644 --- a/lib/WebGUI/i18n/English/WebGUI.pm +++ b/lib/WebGUI/i18n/English/WebGUI.pm @@ -682,6 +682,21 @@ How should this user be notified when they get a new WebGUI message? lastUpdated => 1031514049 }, + '556 description' => { + message => q|How much karma should be added or subtracted from the user's karma?|, + lastUpdated => 1120768600, + }, + + '557 description' => { + message => q|The reason why the user's karma has been changed.|, + lastUpdated => 1120768600, + }, + + 'edit user karma body' => { + message => q|Most karma adjustments are done automatically based on what the user does on your website. However, karma can also be adjusted by Admins
|, + lastUpdated => 1120768627 + }, + '12' => { message => q|Turn admin off.|, lastUpdated => 1031514049