Squash a warning

Thanks to Mosquitoe for the patch.

diff --git a/UCW/Temple.pm b/UCW/Temple.pm
index ff7c4cffc3d264b913b690a519ae5a5ab6e06e81..ff7141072483e62abb191fdf2c062e2d432f2387 100644 (file)
--- a/UCW/Temple.pm
+++ b/UCW/Temple.pm
@@ -109,7 +109,7 @@ sub parse_string($) {
                        $x =~ s/^\[//;
                        $x =~ s/\]$//;
                        eval_if_ok($x);
-               } elsif ($t =~ /\G@\(/cgs) {
+               } elsif ($t =~ /\G\@\(/cgs) {
                        my $x = get_nested(\$t, '\(', '\)');
                        $x =~ s/^\(//;
                        $x =~ s/\)$//;