From 709c4bc9ef277e3391b115b1b0ed29f55f0d9314 Mon Sep 17 00:00:00 2001
From: martin f. krafft
Date: Wed, 15 Feb 2017 04:43:40 +0100
Subject: Print linenumbers in /ctrlact list output

Signed-off-by: martin f. krafft <madduck@madduck.net>
---
 scripts/ctrlact.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'scripts')

diff --git a/scripts/ctrlact.pl b/scripts/ctrlact.pl
index 35e2cd7..6a48773 100644
--- a/scripts/ctrlact.pl
+++ b/scripts/ctrlact.pl
@@ -225,8 +225,8 @@ sub get_mappings_table {
 	my (@arr) = @_;
 	my @ret = ();
 	for (my $i = 0; $i < @arr; $i++) {
-		push @ret, sprintf("%4d: %-10s %-40s %-10s",
-			$i, $arr[$i]->[0], $arr[$i]->[1], $arr[$i]->[2]);
+		push @ret, sprintf("%4d: %-10s %-40s %-10s (line: %3d)",
+			$i, $arr[$i]->[0], $arr[$i]->[1], $arr[$i]->[2], $arr[$i]->[3]);
 	}
 	return join("\n", @ret);
 }
-- 
cgit v1.2.3