From: <ale...@us...> - 2007-12-31 16:49:16
|
Revision: 2605 http://morphix.svn.sourceforge.net/morphix/?rev=2605&view=rev Author: alextreme Date: 2007-12-31 08:49:09 -0800 (Mon, 31 Dec 2007) Log Message: ----------- * minor stdout modifications Modified Paths: -------------- trunk/morph-scripts/deb-get/deb-get Modified: trunk/morph-scripts/deb-get/deb-get =================================================================== --- trunk/morph-scripts/deb-get/deb-get 2007-12-31 15:08:54 UTC (rev 2604) +++ trunk/morph-scripts/deb-get/deb-get 2007-12-31 16:49:09 UTC (rev 2605) @@ -209,12 +209,14 @@ or die "Couldn't open Package list for reading: $!\n"; our $found = ""; print("Looking for $list[$count]\n"); + $line_nr = 0; while(defined ($line = <SOURCE>)) { chomp $line; + $line_nr++; $filename = ""; if (index($line,"Package: ") >= 0 && index($line," $list[$count]") >= 0) { - print($line); - print("Found Package $list[$count] at line $count\n"); + print($line + "\n"); + print("Found Package $list[$count] at line $line_nr\n"); $found = "yes"; } if ($found eq "yes") { This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |