From aaf6ccb9866059edabb6607d435e2c320afcf611 Mon Sep 17 00:00:00 2001
From: "gerv%gerv.net" <>
Date: Wed, 25 Sep 2002 14:11:32 +0000
Subject: Bug 12282 - General summary reports. Patch by gerv; r=joel.

---
 globals.pl | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'globals.pl')

diff --git a/globals.pl b/globals.pl
index 242c8a5f6..64031bc85 100644
--- a/globals.pl
+++ b/globals.pl
@@ -1564,6 +1564,18 @@ $::template ||= Template->new(
         # filter should be used for a full URL that may have
         # characters that need encoding.
         url_quote => \&url_quote ,
+        
+        # In CSV, quotes are doubled, and any value containing a quote or a
+        # comma is enclosed in quotes.
+        csv => sub
+        {
+            my ($var) = @_;
+            $var =~ s/"/""/;
+            if ($var =~ /",/) {
+                $var = "\"$var\"";
+            }
+            return $var;
+        } ,
       } ,
   }
 ) || die("Template creation failed: " . Template->error());
-- 
cgit v1.2.3-24-g4f1b