From 6bb244472fb2b202ac1f534218d1e372ca3e760e Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Mon, 3 Sep 2012 11:14:51 +0100
Subject: [PATCH] Allow special catacters in table names.

---
 Block.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Block.pm b/Block.pm
index f14f7e8..42a4a26 100644
--- a/Block.pm
+++ b/Block.pm
@@ -252,7 +252,7 @@ sub validate_options {
     # If the source is not a reference, we assue it is the table name to check
     } elsif(not ref($settings -> {"source"})) {
         my $checkh = $self -> {"dbh"} -> prepare("SELECT *
-                                                  FROM ".$settings -> {"source"}."
+                                                  FROM `".$settings -> {"source"}."`
                                                        ".$settings -> {"where"});
         # Check for the value in the table...
         $checkh -> execute($value)