diff options
| -rwxr-xr-x | configure.pl | 19 |
1 files changed, 8 insertions, 11 deletions
diff --git a/configure.pl b/configure.pl index e2a256e01..f055295fa 100755 --- a/configure.pl +++ b/configure.pl @@ -1493,34 +1493,31 @@ sub write_pkg_config { ################################################## sub file_list { my ($put_in, $from, $to, %files) = @_; - my $spaces = 16; my $list = ''; - my $len = $spaces; + my $spaces = 16; + foreach (sort keys %files) { my $file = $_; - if($len > 60) { - $list .= "\\\n" . ' 'x$spaces; - $len = $spaces; - } - $file =~ s/$from/$to/ if(defined($from) and defined($to)); my $dir = $files{$_}; $dir = $put_in if defined $put_in; if(defined($dir)) { - $list .= File::Spec->catfile ($dir, $file) . ' '; - $len += length($file) + length($dir); + $list .= File::Spec->catfile ($dir, $file); } else { - $list .= $file . ' '; - $len += length($file); + $list .= $file; } + + $list .= " \\\n "; } + $list =~ s/\\\n +$//; # remove trailing escape + return $list; } |