Fixed to use ENV variables instead of hardcoded values

[public.git] / public

diff --git a/public b/public
index 0d106314438b4d6d186a46e93b770b0d3b5d8cf9..0ecf6d81ba6f4294fbf562fac6229556428c795c 100755 (executable)
--- a/public
+++ b/public
@@ -5,9 +5,12 @@ use warnings;
 use File::Spec;
 use File::Path qw/ make_path /;
 
-my $root_dir = '/mnt/Shared/Personal/My art';
-my $link_dir = '/var/www/html/public';
-my $http_uri = 'http://136.63.171.222/public';
+my $root_dir = $ENV{PUBLIC_ROOT_DIR}
+       or die "Need PUBLIC_ROOT_DIR\n";
+my $link_dir = $ENV{PUBLIC_LINK_DIR}
+       or die "Need PUBLIC_LINK_DIR\n";
+my $http_uri = $ENV{PUBLIC_HTTP_URI}
+       or die "Need PUBLIC_HTTP_URI\n";
 
 
 sub nonce {