From 33954b72f95fc32f507368be80a877c88c65728a Mon Sep 17 00:00:00 2001
From: "Brian Fraser fraserb@gmail.com" <>
Date: Fri, 30 Mar 2012 15:58:00 -0300
Subject: [PATCH] Silence warnings from lib/QueryAdvisorRules.pm

---
 lib/QueryAdvisorRules.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/QueryAdvisorRules.pm b/lib/QueryAdvisorRules.pm
index 5a275f61..40953fc6 100644
--- a/lib/QueryAdvisorRules.pm
+++ b/lib/QueryAdvisorRules.pm
@@ -189,7 +189,7 @@ sub get_rules {
          foreach my $pred ( @$where ) {
             my $val = $pred->{right_arg};
             next unless $val;
-            return 0 if $val =~ m/^\d+$/ && $orderby_col{lc $pred->{left_arg}};
+            return 0 if $val =~ m/^\d+$/ && $orderby_col{lc($pred->{left_arg} || '')};
          }
          return;
       },