mir/libreoffice
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Stylize consistently, add more Emacs mode goodness

Browse Source
This commit is contained in:
Tor Lillqvist
2011-05-31 10:00:39 +03:00
parent 90a9bed187
commit 471fd2e4e8
1 changed files with 42 additions and 43 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
autogen.sh
View File

@@ -16,20 +16,18 @@ sub sanity_checks($)
{ {
my $system = shift; my $system = shift;
my @path = split (':', $ENV{'PATH'}); my @path = split (':', $ENV{'PATH'});
my %required = ( my %required =
(
'pkg-config' => "pkg-config is required to be installed", 'pkg-config' => "pkg-config is required to be installed",
'autoconf' => "autoconf is required", 'autoconf' => "autoconf is required",
'aclocal' => "aclocal is required", 'aclocal' => "aclocal is required",
# 'knurdle' => 'please knurdle me test'
); );
my $exe_ext = ''; my $exe_ext = '';
$exe_ext = ".exe" if ($system =~ m/CYGWIN/); $exe_ext = ".exe" if ($system =~ m/CYGWIN/);
for my $elem (@path) { for my $elem (@path) {
# print "check $elem\n";
for my $app (keys %required) { for my $app (keys %required) {
if (-f "$elem/$app$exe_ext") { if (-f "$elem/$app$exe_ext") {
# print "removing $app - found in $elem/$app\n";
delete $required{$app}; delete $required{$app};
} }
} }
@@ -63,13 +61,12 @@ sub read_args($)
print " $opt\n"; print " $opt\n";
} }
} }
} } else {
else {
push @lst, $_; push @lst, $_;
} }
} }
close ($fh); close ($fh);
# print "read args from file '$file': @lst\n"; # print "read args from file '$file': @lst\n";
return @lst; return @lst;
} }
@@ -149,6 +146,8 @@ if (defined $ENV{NOCONFIGURE}) {
} }
# Local Variables: # Local Variables:
# mode: perl
# cperl-indent-level: 4
# tab-width: 4 # tab-width: 4
# indent-tabs-mode: nil # indent-tabs-mode: nil
# End: # End: