From 44846845f45c84d1921eb8e95fc0ab9f34c20779 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Mon, 30 Mar 2015 21:43:33 +0200
Subject: [PATCH] Added T::arg() which allows to access template arguments in
 Perl code

---
 UCW/Temple.pm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/UCW/Temple.pm b/UCW/Temple.pm
index e1a21e3..3854e3d 100644
--- a/UCW/Temple.pm
+++ b/UCW/Temple.pm
@@ -237,4 +237,8 @@ sub load {
 	return;
 }
 
+sub arg {
+	return $UCW::Temple::arguments->{$_[0]};
+}
+
 1;
-- 
2.39.5