From bc39dda3e4c7068e7bd219166c59110f4035ef4f Mon Sep 17 00:00:00 2001
From: Mike Gabriel <mike.gabriel@das-netzwerkteam.de>
Date: Fri, 23 Jun 2017 00:49:37 +0200
Subject: Provide arctica-getdir. Formerly known as get_adir.

---
 bin/arctica-getdir | 5 +++++
 1 file changed, 5 insertions(+)
 create mode 100755 bin/arctica-getdir

(limited to 'bin/arctica-getdir')

diff --git a/bin/arctica-getdir b/bin/arctica-getdir
new file mode 100755
index 0000000..0eab4b6
--- /dev/null
+++ b/bin/arctica-getdir
@@ -0,0 +1,5 @@
+#!/usr/bin/perl -T
+
+use Arctica::Core::ManageDirs;
+my $adirs =  Arctica::Core::ManageDirs->new();
+print "$adirs->{'tmp_adir'}\n";
-- 
cgit v1.2.3