From 21e6ae4b22b305927847737f5756f5172748a94a Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Tue, 5 Apr 2016 00:12:08 +0200
Subject: [PATCH] @(...) follows conditions properly

---
 UCW/Temple.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/UCW/Temple.pm b/UCW/Temple.pm
index 5fc82d0..45c0ca3 100644
--- a/UCW/Temple.pm
+++ b/UCW/Temple.pm
@@ -187,7 +187,7 @@ sub parse_string($$) {
 			my $x = get_nested(\$t, '\(', '\)');
 			$x =~ s/^\(//;
 			$x =~ s/\)$//;
-			out (defined($arguments->{$x}) ? $arguments->{$x} : "");
+			out (defined($arguments->{$x}) ? $arguments->{$x} : "") if $cond[0] > 0;
 		} elsif ($t =~ /\G\@(\w+)\(/cgs) {
 			my $func = $1;
 			my $args = get_function_args(\$t, '(', ')');
-- 
2.39.5