Remove unused tabs from the Help TOC.

Remove setHelp commands and sub-commands from Operation/User.pm.
This commit is contained in:
Colin Kuskie 2007-07-22 05:31:26 +00:00
parent 90f53fbe9d
commit 2e23311305
2 changed files with 15 additions and 27 deletions

View file

@ -212,12 +212,6 @@ sub _getHelpName {
elsif ($file =~ /^Macro_/) { elsif ($file =~ /^Macro_/) {
$helpName = 'macroName'; $helpName = 'macroName';
} }
elsif ($file =~ /^Workflow_Activity_/) {
$helpName = 'activityName';
}
elsif ($file =~ /^Template_/) {
$helpName = 'templateParserName';
}
else { else {
$helpName = 'topicName'; $helpName = 'topicName';
} }
@ -439,14 +433,6 @@ sub www_viewHelpTOC {
label => $i18n->get('topicName', 'Macros'), label => $i18n->get('topicName', 'Macros'),
uiLevel => 1, uiLevel => 1,
}, },
workf => {
label => $i18n->get('topicName', 'Workflow'),
uiLevel => 1,
},
templ => {
label => $i18n->get('template parsers', 'Asset_Template'),
uiLevel => 1,
},
); );
my @files = _getHelpFilesList($session,); my @files = _getHelpFilesList($session,);

View file

@ -70,7 +70,6 @@ sub _submenu {
my $workarea = $properties->{workarea}; my $workarea = $properties->{workarea};
my $title; my $title;
$title = $i18n->get($properties->{title}) if ($properties->{title}); $title = $i18n->get($properties->{title}) if ($properties->{title});
$ac->setHelp($properties->{help}) if ($properties->{help});
if ($session->user->isInGroup(11)) { if ($session->user->isInGroup(11)) {
$ac->addSubmenuItem($session->url->page("op=editUser;uid=new"), $i18n->get(169)); $ac->addSubmenuItem($session->url->page("op=editUser;uid=new"), $i18n->get(169));
@ -390,11 +389,12 @@ sub www_editUser {
-size=>15, -size=>15,
-value=>\@groupsToDelete -value=>\@groupsToDelete
); );
my $submenu = _submenu($session,{ workarea => $error.$tabform->print, my $submenu = _submenu(
title => 168, $session,
help => 'user add/edit', { workarea => $error.$tabform->print,
userId => $uid, title => 168,
}); userId => $uid, }
);
return $submenu;; return $submenu;;
} }
@ -501,10 +501,11 @@ sub www_editUserKarma {
); );
$f->submit; $f->submit;
$output .= $f->print; $output .= $f->print;
my $submenu = _submenu($session,{ workarea => $output, my $submenu = _submenu(
title => 558, $session,
help => 'edit user karma', { workarea => $output,
}); title => 558, }
);
return $submenu; return $submenu;
} }
@ -605,9 +606,10 @@ sub www_listUsers {
$output .= '</table>'; $output .= '</table>';
$p->setAlphabeticalKey('username'); $p->setAlphabeticalKey('username');
$output .= $p->getBarTraditional; $output .= $p->getBarTraditional;
my $submenu = _submenu($session, { workarea => $output, my $submenu = _submenu(
help => "users manage" $session,
}); { workarea => $output, }
);
return $submenu; return $submenu;
} }