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