Ignore:
Timestamp:
Jun 1, 2003, 5:24:12 AM (17 years ago)
Author:
ranger
Message:

fat frameworks were getting set wrong because of a stay regex

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/dports/sysutils/rpm/files/patch-autodeps-darwin-prov.diff

    r2713 r2715  
    1 --- /dev/null   Sat May 31 21:28:36 2003
    2 +++ autodeps/darwin.prov        Sat May 31 21:25:55 2003
     1--- /dev/null   Sat May 31 18:22:36 2003
     2+++ autodeps/darwin.prov        Sat May 31 18:21:55 2003
    33@@ -0,0 +1,45 @@
    44+#!/usr/bin/perl
     
    99+my %files;
    1010+
    11 +while (my $FILE = <STDIN>) {
    12 +       chomp $FILE;
     11+while (my $DEP = <STDIN>) {
     12+       chomp $DEP;
    1313+
    14 +       next if (-d $FILE);
     14+       next if (-d $DEP);
    1515+
    16 +       next if ($FILE =~ m,\.class$,);
     16+       next if ($DEP =~ m,\.class$,);
    1717+
    1818+       for my $ARCH ('ppc', 'i386') {
     19+               my $FILE = $DEP;
    1920+               my $header;
    2021+               my $FILE_esc = $FILE;
     
    2829+                       close(OTOOL);
    2930+                       if (split(/\s+/, $header) and $_[4] eq 'DYLIB') {
    30 +                               if (open(OTOOL, "otool -arch '$ARCH' -D '$FILE_esc' 2>/dev/null |")) {
    31 +                                       <OTOOL>;
     31+                               if (open(OTOOL, "otool -arch '$ARCH' -DX '$FILE_esc' 2>/dev/null |")) {
    3232+                                       chomp($FILE = <OTOOL>);
    3333+                                       if ($FILE =~ m,\.framework/,) {
Note: See TracChangeset for help on using the changeset viewer.