delete $item->{submenu};
}
+ #sanitize those stupid menu inlinks
+ if ($item->{module} eq 'menu.pl') {
+ delete $item->{module};
+ delete $item->{action};
+ delete $item->{target};
+ }
+
# sanitize INSTANCE_CONF
if ($item->{INSTANCE_CONF}) {
my $instance_conf = delete $item->{INSTANCE_CONF};
my $first = 0;
for my $key (@order) {
next unless exists $node->{$key};
- $yaml .= ($first++ ? ' ' : '- ') . $key . ": ";
+ $yaml .= ($first++ ? ' ' : '- ') . $key . ":";
if (!ref $node->{$key}) {
- $yaml .= $node->{$key} . "\n";
+ $yaml .= ' ' . $node->{$key} . "\n";
} else {
$yaml .= "\n";
for ('action', grep !/^action$/, keys %{ $node->{$key} }) {