From: Sven Donath Date: Wed, 18 Aug 2010 11:38:28 +0000 (+0200) Subject: Das seitliche Menü hat jetzt Icons für die Unterpunkte, welche auch klickbar sind. X-Git-Tag: release-2.6.2beta1~177 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=ad27efa6a3b7e8feea8497c24acebe5bd501156b;p=kivitendo-erp.git Das seitliche Menü hat jetzt Icons für die Unterpunkte, welche auch klickbar sind. Damit nähert sich die Optik an das XUL-Menü an, ohne von XUL abhängig zu sein. Evtl. mache ich die kleinen Icons abschaltbar, für die, die das so haben wollen. Die Icons haben title-tags, die mal in ein Hilfe-System münden sollen. (Baustelle) Im Gegensatz zum XUL-Menü ist eine durchgängige Bedienung mit Einzelklick möglich. Den Redirekt für den Aufruf von Lx-Office mit einem Nicht-XUL-fähigen Browser und aktiviertem XUL-Menü habe ich auf dieses HTML-Menü gelegt, weil alles andere nicht kompatibel genug ist. --- diff --git a/bin/mozilla/menu.pl b/bin/mozilla/menu.pl index b53f132aa..92fa43fa2 100644 --- a/bin/mozilla/menu.pl +++ b/bin/mozilla/menu.pl @@ -86,7 +86,7 @@ sub acc_menu { $mainlevel =~ s/\Q$mainlevel\E--//g; my $menu = Menu->new($::menufile); - $form->{title} = $locale->text('Accounting Menu'); + $form->{title} = $locale->text('Lx-Office'); $form->header; @@ -96,7 +96,7 @@ sub acc_menu { |; print qq|
\n\n|; + . qq|" border="0">\n|; §ion_menu($menu); @@ -129,9 +129,9 @@ sub section_menu { $ml =~ s/--.*//; if ($ml eq $mainlevel) { $zeige = 1; } else { $zeige = 0; } - my $spacer = " " x (($item =~ s/--/--/g) * 1); + my $spacer = " " x (($item =~ s/--/--/g) * 2); $label =~ s/.*--//g; - my $label_icon = $label . ".gif"; + my $label_icon = $level . "--" . $label . ".png"; my $mlab = $label; $label = $locale->text($label); @@ -197,18 +197,29 @@ sub section_menu { if ($zeige) { if (scalar @chunks <= 1) { print - qq|\n|; + qq|\n|; } else { my $tmpitem = $menu->menuitem(\%myconfig, \%$form, $item, $level); print - qq|\n|; map { print - qq|\n|; } 1..$#chunks; @@ -218,10 +229,10 @@ sub section_menu { } else { my $ml_ = $form->escape($ml); print - qq|\n|; + qq|\n|; §ion_menu($menu, $item); - #print qq|
\n|; + print qq|\n|; } } } diff --git a/xslt/xulmenu.xsl b/xslt/xulmenu.xsl index 3427c7b14..243d30ef8 100644 --- a/xslt/xulmenu.xsl +++ b/xslt/xulmenu.xsl @@ -18,11 +18,11 @@ - + Ihr Browser unterstuetzt kein XUL!
-wenn die automatische weiterleitung nicht funktioniert klicken sie hier +Falls die automatische Weiterleitung nicht funktioniert, klicken Sie hier.
$spacer| - . $menu->menuitem(\%myconfig, \%$form, $item, $level) - . qq|$label
$spacer| + . $menu->menuitem(\%myconfig, \%$form, $item, $level) ; + + if (-f "image/icons/16x16/$label_icon") + { print + qq|  | } + else { + print qq||; + } + + print + qq|$label
$spacer| + qq|
$spacer| . $tmpitem . qq|$chunks[0]
$spacer| + qq|
$spacer| . $tmpitem . qq|$chunks[$_]
 $label    
 $label