From: Jon Langseth <jon.langseth@hig.no>
Date: Tue, 14 May 2013 11:26:00 +0000 (+0200)
Subject: Verbose list with trak ID's
X-Git-Url: https://git.defcon.no/?a=commitdiff_plain;h=29afe94572541d9648b0188ba0e487ced9f820de;p=trk

Verbose list with trak ID's
---

diff --git a/trk b/trk
index f1cee04..d089a47 100755
--- a/trk
+++ b/trk
@@ -519,7 +519,15 @@ elsif ( ( $command eq "projects" ) || ( $command eq "list" )  )
 	#foreach my $id ( keys %$tracks )
 	foreach my $id ( sort { $tracks->{$a} cmp $tracks->{$b} || $a cmp $b } keys %$tracks  )
 	{
-		printf(" %s %s\n", ($id eq $current ? ">" : " " ),$tracks->{$id} );
+	
+		if (( $#ARGV >= 1) && ( $ARGV[1] eq "verbose" ))
+		{
+			printf(" %s %s %s\n", ($id eq $current ? ">" : " " ), $id , $tracks->{$id});
+		}
+		else
+		{
+			printf(" %s %s\n", ($id eq $current ? ">" : " " ),$tracks->{$id} );
+		}
 	}
 	print("\n");
 }