From: Justin F. H. <th...@us...> - 2003-07-02 21:49:21
|
Update of /cvsroot/fink/experimental/thesin/finkmods/depends/perlmod/Fink In directory sc8-pr-cvs1:/tmp/cvs-serv13406/perlmod/Fink Modified Files: Depends.pm Log Message: more debug Index: Depends.pm =================================================================== RCS file: /cvsroot/fink/experimental/thesin/finkmods/depends/perlmod/Fink/Depends.pm,v retrieving revision 1.11 retrieving revision 1.12 diff -u -d -r1.11 -r1.12 --- Depends.pm 2 Jul 2003 21:41:12 -0000 1.11 +++ Depends.pm 2 Jul 2003 21:49:19 -0000 1.12 @@ -215,8 +215,8 @@ # get a list of linked files to the pkg files foreach $file (@files) { - print "-- ".$file."\n"; chomp($file); + print "-- FILE -- ".$file."\n"; open(OTOOL, "otool -L $file 2>/dev/null |") or die "can't run otool: $!\n"; # need to drop all links to system libs and the first two lines while (<OTOOL>) { @@ -225,6 +225,7 @@ next if ("$_" =~ /\/usr\/lib\//); # Nuke system libs and next if ("$_" =~ /\/System\/Library/); # frameworks $_ =~ s/\ \(.*$//; # Nuke the end + print " -- MATCH -- ".$_."\n"; push(@matches, $_); } close (OTOOL); |