romenskiy2012/curl
1
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2026-07-31 03:58:03 +03:00
Code Issues Projects Releases Packages Wiki Activity

cmdline-opts: Fixed build and test in out of source tree builds

Browse source
This commit is contained in:
Dan Fandrich 2017-02-06 22:47:41 +01:00
parent 88bdd7cf6f
commit edb2d02855
5 changed files with 11 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

2
docs/cmdline-opts/Makefile.am
View file

@ -73,4 +73,4 @@ EXTRA_DIST = $(DPAGES) MANPAGE.md gen.pl $(OTHERPAGES)
all: $(MANPAGE)
$(MANPAGE): $(DPAGES) $(OTHERPAGES)
@PERL@ gen.pl mainpage > $(MANPAGE)
@PERL@ $(srcdir)/gen.pl mainpage $(srcdir) > $(MANPAGE)

10
docs/cmdline-opts/gen.pl
View file

@ -16,7 +16,7 @@ Unfortunately it seems some perls like msysgit can't handle a global input-only
=end comment
=cut
my $some_dir=".";
my $some_dir=$ARGV[1] || ".";
opendir(my $dh, $some_dir) || die "Can't opendir $some_dir: $!";
my @s = grep { /\.d$/ && -f "$some_dir/$_" } readdir($dh);
@ -101,7 +101,7 @@ sub added {
sub single {
my ($f, $standalone)=@_;
open(F, "<:crlf", "$f") ||
open(F, "<:crlf", "$some_dir/$f") ||
return 1;
my $short;
my $long;
@ -235,7 +235,7 @@ sub single {
sub getshortlong {
my ($f)=@_;
open(F, "<:crlf", "$f");
open(F, "<:crlf", "$some_dir/$f");
my $short;
my $long;
my $help;
@ -281,7 +281,7 @@ sub indexoptions {
sub header {
my ($f)=@_;
open(F, "<:crlf", "$f");
open(F, "<:crlf", "$some_dir/$f");
my @d;
while(<F>) {
push @d, $_;
@ -371,7 +371,7 @@ sub getargs {
}
} while($f);
print "Usage: gen.pl <mainpage/listhelp/single FILE/protos>\n";
print "Usage: gen.pl <mainpage/listhelp/single FILE/protos> [srcdir]\n";
}
#------------------------------------------------------------------------