Revision 5a7adba1
Von Moritz Bunkus vor mehr als 18 Jahren hinzugefügt
| bin/mozilla/menuv3.pl | ||
|---|---|---|
|
return print_menu($menu);
|
||
|
}
|
||
|
|
||
|
sub my_length {
|
||
|
my ($s) = @_;
|
||
|
my $len = 0;
|
||
|
my $i;
|
||
|
my $skip = 0;
|
||
|
|
||
|
for ($i = 0; $i < length($s); $i++) {
|
||
|
my $c = substr($s, $i, 1);
|
||
|
if ($skip && ($c eq ";")) {
|
||
|
$skip = 0;
|
||
|
} elsif ($skip) {
|
||
|
next;
|
||
|
} elsif ($c eq "&") {
|
||
|
$skip = 1;
|
||
|
$len++;
|
||
|
} else {
|
||
|
$len++;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return $len;
|
||
|
}
|
||
|
|
||
|
sub print_menu {
|
||
|
my ($menu, $parent, $depth) = @_;
|
||
|
my $html;
|
||
| ... | ... | |
|
my $menu_title = $locale->text($item);
|
||
|
my $menu_text = $menu_title;
|
||
|
|
||
|
$menu_text =~ s/ /<br>/ if ($parent && (my_length($menu_text) >= 17));
|
||
|
|
||
|
my $target = "main_window";
|
||
|
$target = $menu_item->{"target"} if ($menu_item->{"target"});
|
||
|
|
||
Auch abrufbar als: Unified diff
CSS-Menü: keinen Zeilenumbruch mehr erzwingen.