|
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.
|