Update of /cvsroot/fink/experimental/dmacks/scripts
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv23225
Modified Files:
flag-sort
Log Message:
First arg is not special, it's just an unrecognized "very important" arg; place
all unrecognized args first, so our sort is stable for multi-word commands
("/bin/sh ./libtool"). Diagnosed and solved by jfm
Index: flag-sort
===================================================================
RCS file: /cvsroot/fink/experimental/dmacks/scripts/flag-sort,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -d -r1.4 -r1.5
--- flag-sort 19 Jun 2009 17:53:36 -0000 1.4
+++ flag-sort 19 Jun 2009 18:00:32 -0000 1.5
@@ -42,8 +42,7 @@
}
# what we will launch after organizing the flags
-my @subcmd = (shift);
-#warn "$0: subcmd: $subcmd[0]\n";
+my @subcmd = ();
# separate the args according to flag
while (@ARGV) {
@@ -58,6 +57,9 @@
}
}
+#assume totally unknown flags and args are most important
+push @subcmd, @other_queue;
+
# sort all paths for each flag
foreach my $flag (@flag_order) {
next unless defined $flag_queues{$flag};
@@ -87,8 +89,5 @@
push @subcmd, map "$flag$_", @path_list;
}
-#warn "$0: @other_queue\n";
-push @subcmd, @other_queue;
-
print "$0: @subcmd\n" if $verbose;
exec {$subcmd[0]} @subcmd or die "Could not exec $subcmd[0]: $!\n";
------------------------------------------------------------------------------
Are you an open source citizen? Join us for the Open Source Bridge conference!
Portland, OR, June 17-19. Two days of sessions, one day of unconference: $250.
Need another reason to go? 24-hour hacker lounge. Register today!
http://ad.doubleclick.net/clk;215844324;13503038;v?http://opensourcebridge.org
_______________________________________________
Fink-commits mailing list
Fink-commits@lists.sourceforge.net
http://news.gmane.org/gmane.os.apple.fink.cvs
