Menu::menuitem_new: nur bei Trace-Level DEBUG2 ausgeben

diff --git a/SL/Menu.pm b/SL/Menu.pm
index 48ac622..57d8b4e 100644 (file)
--- a/SL/Menu.pm
+++ b/SL/Menu.pm
@@ -59,7 +59,7 @@ sub new {
 }
 
 sub menuitem_new {
-  $main::lxdebug->enter_sub();
+  $main::lxdebug->enter_sub(LXDebug::DEBUG2());
 
   my ($self, $name, $item) = @_;
 
@@ -84,7 +84,7 @@ sub menuitem_new {
     $item->{href}      .= "&" . $form->escape($key) . "=" . $form->escape($value);
   }
 
-  $main::lxdebug->leave_sub();
+  $main::lxdebug->leave_sub(LXDebug::DEBUG2());
 }
 
 sub access_control {