-sub menuitem {
- my ($item, $name) = @_;
-
- $item->{module} ||= $::form->{script};
- $item->{action} ||= "section_menu";
- $item->{target} ||= "main_window";
- $item->{href} ||= "$item->{module}?action=$item->{action}";
-
- # add other params
- foreach my $key (keys %$item) {
- next if $key =~ /target|module|action|href/;
- $item->{href} .= "&" . $::form->escape($key, 1) . "=";
- my ($value, $conf) = split(/=/, $item->{$key}, 2);
- $value = $::myconfig{$value} . "/$conf" if ($conf);
- $item->{href} .= $::form->escape($value, 1);
- }
-
-# my $str = "<a href='$href' $target_token>";
-#
-# return $str;
-}
-