From f59ea54fd2dea04b6dfc91d56d7056b61d5f3b17 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Tue, 25 Aug 2009 18:56:19 +0100
Subject: [PATCH] Honour YARRG_DATA_DIR in CommodsWeb

---
 yarrg/CommodsWeb.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/yarrg/CommodsWeb.pm b/yarrg/CommodsWeb.pm
index 036c7e9..3ad8590 100644
--- a/yarrg/CommodsWeb.pm
+++ b/yarrg/CommodsWeb.pm
@@ -73,6 +73,8 @@ sub sourcebasedir () {
 }
 
 sub datadir () {
+    my $edir= $ENV{'YARRG_DATA_DIR'};
+    return $edir if defined $edir;
     my $dir= dotperllibdir();
     if (stat "$dir/DATA") {
 	return "$dir/DATA";
-- 
2.30.2