From efaa9aa9201e5d35927b49be4167e02ca6ba9437 Mon Sep 17 00:00:00 2001 From: Michal Vaner Date: Fri, 31 Oct 2008 15:57:21 +0100 Subject: [PATCH] Doc system: Detect asciidoc And decide if we build documentation. --- free/libs/configure | 1 + ucw/perl/UCW/Configure/Doc.pm | 26 ++++++++++++++++++++++++++ 2 files changed, 27 insertions(+) create mode 100644 ucw/perl/UCW/Configure/Doc.pm diff --git a/free/libs/configure b/free/libs/configure index b2433fc1..000d71a8 100755 --- a/free/libs/configure +++ b/free/libs/configure @@ -29,6 +29,7 @@ Include Get("CONFIG"); require UCW::Configure::Paths; require UCW::Configure::C; require UCW::Configure::LibUCW; +require UCW::Configure::Doc; Finish(); Log "\nConfigured, run `make' to build everything.\n"; diff --git a/ucw/perl/UCW/Configure/Doc.pm b/ucw/perl/UCW/Configure/Doc.pm new file mode 100644 index 00000000..fe5a8a14 --- /dev/null +++ b/ucw/perl/UCW/Configure/Doc.pm @@ -0,0 +1,26 @@ +# UCW Library configuration system: documentation requirements +# (c) 2008 Michal Vaner + +package UCW::Configure::Paths; +use UCW::Configure; + +use strict; +use warnings; + +Test("ASCII_DOC", "Checking for AsciiDoc", sub { + my $version = `asciidoc --version`; + return "none" if !defined $version || $version eq ""; + my( $vnum ) = $version =~ / (\d+)\.\S*$/; + return "old" if $vnum < 7; + return "yes"; +}); + +if(Get("ASCII_DOC") eq "yes") { + Set("CONFIG_DOC"); +} else { + Warn("Need asciidoc >= 7 to build documentation"); + UnSet("CONFIG_DOC"); +} + +# We succeeded +1; -- 2.39.5