X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/51d5993574d3dada29e5aa7a81e118daae9f4df9..c345944814d217a00b73824747ed34725f311f10:/SL/Menu.pm diff --git a/SL/Menu.pm b/SL/Menu.pm index b91611242..800f000b2 100644 --- a/SL/Menu.pm +++ b/SL/Menu.pm @@ -73,6 +73,8 @@ sub _merge { for my $node (@$data) { my $id = $node->{id}; + die "menu: node with name '$node->{name}' does not have an id" if !$id; + my $merge_to = $by_id->{$id}; if (!$merge_to) {