summaryrefslogtreecommitdiff
path: root/modules/TemplateParser.pm
diff options
context:
space:
mode:
authorAdam Mitz <mitza-oci@users.noreply.github.com>2010-08-05 17:01:36 +0000
committerAdam Mitz <mitza-oci@users.noreply.github.com>2010-08-05 17:01:36 +0000
commit4ef1a5f5e86aac9aa76c3fc6f2cee1f22c4f2c8e (patch)
tree6cdef8df8eaf81b71ef34427a595999ea2a44357 /modules/TemplateParser.pm
parentd8025ca319f632f81f35614d14a1e73d909beddd (diff)
downloadMPC-4ef1a5f5e86aac9aa76c3fc6f2cee1f22c4f2c8e.tar.gz
ChangeLogTag: Thu Aug 5 17:00:23 UTC 2010 Adam Mitz <mitza@ociweb.com>
Diffstat (limited to 'modules/TemplateParser.pm')
-rw-r--r--modules/TemplateParser.pm8
1 files changed, 8 insertions, 0 deletions
diff --git a/modules/TemplateParser.pm b/modules/TemplateParser.pm
index b22190ff..9c1eb56f 100644
--- a/modules/TemplateParser.pm
+++ b/modules/TemplateParser.pm
@@ -81,6 +81,7 @@ my %keywords = ('if' => 0,
'translate_vars' => 2 | 1,
'convert_slashes' => 2,
'new_guid' => 0,
+ 'deref' => 0,
'set' => 0,
);
@@ -1885,6 +1886,13 @@ sub handle_new_guid {
}
+sub handle_deref {
+ my($self, $name) = @_;
+ my $val = $self->get_value_with_default($self->get_value_with_default($name));
+ $self->append_current($val);
+}
+
+
sub handle_set {
my($self, $val) = @_;
my @params = $self->split_parameters($val);