diff --git a/inc/My/Builder/Unix.pm b/inc/My/Builder/Unix.pm index 15291d5..ad3e600 100644 --- a/inc/My/Builder/Unix.pm +++ b/inc/My/Builder/Unix.pm @@ -18,7 +18,7 @@ sub get_additional_cflags { my $self = shift; my @list = (); ### any platform specific -L/path/to/libs shoud go here - for (keys %$inc_lib_candidates) { + for (sort keys %$inc_lib_candidates) { push @list, "-I$_" if (-d $_); } return join(' ', @list); @@ -36,7 +36,7 @@ sub get_additional_libs { $rv{"-Wl,-rpath,$ld"} = 1 if $^O =~ /^linux|dragonfly|.+bsd$/; } } - push @list, (keys %rv); + push @list, sort (keys %rv); if ($^O eq 'openbsd') { my $osver = `uname -r 2>/dev/null`; if ($self->notes('perl_libs')->{pthread} || ($osver && $osver < 5.0)) { diff --git a/inc/My/Utility.pm b/inc/My/Utility.pm index 6d10d6d..8b6e5d2 100644 --- a/inc/My/Utility.pm +++ b/inc/My/Utility.pm @@ -477,7 +477,7 @@ sub find_file { no warnings; find({ wanted => sub { push @files, rel2abs($_) if /$re/ }, follow => 1, no_chdir => 1 , follow_skip => 2}, $dir); }; - return @files; + return @files = sort @files; # enforce list context, see `perldoc -f sort` } sub find_SDL_dir {