From 9fb0473affec11ee3f9a59145d67ffb063fc5dfc Mon Sep 17 00:00:00 2001
From: Nick Clemens <nick@bywatersolutions.com>
Date: Wed, 31 Jul 2019 11:43:11 +0000
Subject: [PATCH] Bug 23390: (follow-up) Quote aliases

---
 reports/guided_reports.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/reports/guided_reports.pl b/reports/guided_reports.pl
index ab13e1ff23..bb4e87efe4 100755
--- a/reports/guided_reports.pl
+++ b/reports/guided_reports.pl
@@ -1085,6 +1085,7 @@ sub get_prepped_report {
         my ($type,$name) = split /\|/,$split[$i*2+1]; # We split them on '|'
         $headers->{$name} = $type; # Store as a lookup for the template
         $split[$i*2+1] =~ s/(\||\?|\.|\*|\(|\)|\%)/\\$1/g; #Quote any special characters so we can replace the placeholders
+        $name = C4::Context->dbh->quote($name);
         $sql =~ s/\[\[$split[$i*2+1]\]\]/$type AS $name/; # Remove placeholders from SQL
     }
 
-- 
2.11.0