From b90a8f82018e9f2fae603e91beb172e3da678b09 Mon Sep 17 00:00:00 2001
From: vitalif <vitalif@2be256b4-0725-11dc-8e68-8b2fc2fe2491>
Date: Sat, 18 Oct 2008 13:56:52 +0000
Subject: [PATCH] debug

---
 VMX/Common.pm   | 2 +-
 VMX/Template.pm | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/VMX/Common.pm b/VMX/Common.pm
index aac1c1e..9e67f3c 100644
--- a/VMX/Common.pm
+++ b/VMX/Common.pm
@@ -90,7 +90,7 @@ sub trim
 # $str = htmlspecialchars ($str)
 sub htmlspecialchars
 {
-    $_ = shift;
+    local $_ = shift;
     s/&/&apos;/gso;
     s/</&lt;/gso;
     s/>/&gt;/gso;
diff --git a/VMX/Template.pm b/VMX/Template.pm
index e0efd1a..5d07dc0 100644
--- a/VMX/Template.pm
+++ b/VMX/Template.pm
@@ -153,7 +153,7 @@ sub datapop
 sub parse
 {
     my $self = shift;
-    my $handle = shift;
+    my ($handle) = @_;
     die("[Template] couldn't load template file for handle $handle")
         unless $self->loadfile($handle);
     $self->compile($handle);