diff options
author | lloyd <[email protected]> | 2008-04-13 20:22:44 +0000 |
---|---|---|
committer | lloyd <[email protected]> | 2008-04-13 20:22:44 +0000 |
commit | 95185d453f774b8eb7344b2906d73f8eb1ed87d2 (patch) | |
tree | 66da1da65f1059b9585cf55de40a761f47ff2848 | |
parent | a2f8fcd90426b1f04f70130d873a29636e1e9bf4 (diff) |
Put each file in a list in the makefile on a different line
-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; } |