Set a default value for `getHydraPath'.

This commit is contained in:
Ludovic Courtès 2011-03-02 15:17:03 +00:00
parent b59ca01e40
commit bf927b3180
3 changed files with 14 additions and 12 deletions

View file

@ -55,6 +55,7 @@ AC_CONFIG_FILES([
src/sql/Makefile src/sql/Makefile
src/xsl/Makefile src/xsl/Makefile
src/lib/Makefile src/lib/Makefile
src/lib/Hydra/Helper/Nix.pm
src/root/Makefile src/root/Makefile
src/script/Makefile src/script/Makefile

View file

@ -24,9 +24,7 @@ sub isValidPath {
sub getHydraPath { sub getHydraPath {
my $dir = $ENV{"HYDRA_DATA"}; my $dir = $ENV{"HYDRA_DATA"} || "@localstatedir@/lib/hydra";
die "The HYDRA_DATA environment variable is not set!\n" unless defined $dir;
die "The HYDRA_DATA directory does not exist!\n" unless -d $dir;
return $dir; return $dir;
} }

View file

@ -1,12 +1,15 @@
PERL_MODULES = \ PERL_MODULES = \
$(wildcard *.pm) \ $(wildcard *.pm) \
$(wildcard Hydra/*.pm) \ $(wildcard Hydra/*.pm) \
$(wildcard Hydra/Helper/*.pm) \ Hydra/Helper/AddBuilds.pm \
$(wildcard Hydra/Model/*.pm) \ Hydra/Helper/CatalystUtils.pm \
$(wildcard Hydra/View/*.pm) \ Hydra/Helper/Nix.pm.in \
$(wildcard Hydra/Schema/*.pm) \ $(wildcard Hydra/Helper/*.pm) \
$(wildcard Hydra/Controller/*.pm) \ $(wildcard Hydra/Model/*.pm) \
$(wildcard Hydra/Base/*.pm) \ $(wildcard Hydra/View/*.pm) \
$(wildcard Hydra/Schema/*.pm) \
$(wildcard Hydra/Controller/*.pm) \
$(wildcard Hydra/Base/*.pm) \
$(wildcard Hydra/Base/Controller/*.pm) $(wildcard Hydra/Base/Controller/*.pm)
EXTRA_DIST = $(PERL_MODULES) EXTRA_DIST = $(PERL_MODULES)