From f181e2ecb0c7df5dc5cb98d7310e79aa603a9ee7 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sat, 21 Sep 2024 17:07:04 +0200 Subject: restore -L / lines --- bin/efa-m | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) (limited to 'bin') diff --git a/bin/efa-m b/bin/efa-m index f4211a3..77f80e1 100755 --- a/bin/efa-m +++ b/bin/efa-m @@ -251,7 +251,7 @@ sub show_lines { for my $l ( $efa->lines ) { - if ( ( @grep_lines and none { $l->name eq $_ } @grep_lines ) + if ( ( @grep_lines and none { $l->number eq $_ } @grep_lines ) or ( @grep_mots and none { $l->mot_name eq $_ } @grep_mots ) ) { next; @@ -261,8 +261,13 @@ sub show_lines { next; } - push( @output, - [ $l->type, $l->name, $l->direction // q{}, q{}, $l->route // q{} ] + push( + @output, + [ + $l->type, $l->number, + $l->direction // q{}, q{}, + $l->route // q{} + ] ); } -- cgit v1.2.3