make {{this}} an alias to {{.}} and make them work at the top level

1 files changed, 24 insertions, 0 deletions

diff --git a/lib/Text/Handlebars.pm b/lib/Text/Handlebars.pm
index 71b1ac1..c1afc32 100644
--- a/lib/Text/Handlebars.pm
+++ b/lib/Text/Handlebars.pm
@@ -130,4 +130,28 @@ sub _register_builtin_methods {
     };
 }
 
+sub render_string {
+    my $self = shift;
+    my ($string, $vars) = @_;
+
+    if (ref($vars) && ref($vars) eq 'HASH') {
+        return $self->SUPER::render_string(@_);
+    }
+    else {
+        return $self->SUPER::render_string($string, { '.' => $vars });
+    }
+}
+
+sub render {
+    my $self = shift;
+    my ($name, $vars) = @_;
+
+    if (ref($vars) && ref($vars) eq 'HASH') {
+        return $self->SUPER::render(@_);
+    }
+    else {
+        return $self->SUPER::render($name, { '.' => $vars });
+    }
+}
+
 1;