From 3adf7b25ff2a50e07c2f7f3512ba9158bad89e34 Mon Sep 17 00:00:00 2001
From: Martin Mares <mj@ucw.cz>
Date: Wed, 1 Oct 2008 21:57:17 +0200
Subject: [PATCH] Fixed an escape.

---
 UCW/Temple.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
 mode change 100755 => 100644 UCW/Temple.pm

diff --git a/UCW/Temple.pm b/UCW/Temple.pm
old mode 100755
new mode 100644
index 41af968..d3f2cc4
--- a/UCW/Temple.pm
+++ b/UCW/Temple.pm
@@ -95,7 +95,7 @@ sub parse_string($) {
 		} elsif ($t =~ /\G\@\[/cgs) {
 			my $x = get_nested(\$t, '\[', '\]');
 			$x =~ s/^\[//;
-			$x =~ s/$\]//;
+			$x =~ s/\$\]//;
 			eval_if_ok($x);
 		} elsif ($t =~ /\G\@(\w+)\(/cgs) {
 			my $func = $1;
-- 
2.39.5