From 7c23a0892182e126df570bd8272dd9214d82886d Mon Sep 17 00:00:00 2001
From: Miika Turkia <miika.turkia@gmail.com>
Date: Mon, 22 Dec 2014 23:04:07 +0200
Subject: Support quoting strings with "" on manual CSV import

Signed-off-by: Miika Turkia <miika.turkia@gmail.com>
Signed-off-by: Dirk Hohndel <dirk@hohndel.org>
---
 xslt/manualcsv2xml.xslt | 46 +++++++++++++++++++++++++++++++++++++---------
 1 file changed, 37 insertions(+), 9 deletions(-)

diff --git a/xslt/manualcsv2xml.xslt b/xslt/manualcsv2xml.xslt
index ac9d5c354..597b296f7 100644
--- a/xslt/manualcsv2xml.xslt
+++ b/xslt/manualcsv2xml.xslt
@@ -347,23 +347,51 @@
     <xsl:param name="line"/>
     <xsl:choose>
       <xsl:when test="$index > 0">
-        <xsl:call-template name="getFieldByIndex">
-          <xsl:with-param name="index" select="$index -1"/>
-          <xsl:with-param name="line" select="substring-after($line, $fs)"/>
-        </xsl:call-template>
+        <xsl:choose>
+          <xsl:when test="substring($line, 1, 1) = '&quot;'">
+            <xsl:call-template name="getFieldByIndex">
+              <xsl:with-param name="index" select="$index -1"/>
+              <xsl:with-param name="line" select="substring-after($line, $fs)"/>
+            </xsl:call-template>
+          </xsl:when>
+          <xsl:otherwise>
+            <xsl:call-template name="getFieldByIndex">
+              <xsl:with-param name="index" select="$index -1"/>
+              <xsl:with-param name="line" select="substring-after($line, $fs)"/>
+            </xsl:call-template>
+          </xsl:otherwise>
+        </xsl:choose>
       </xsl:when>
       <xsl:otherwise>
         <xsl:choose>
-          <xsl:when test="substring-before($line,$fs) != ''">
-            <xsl:value-of select="substring-before($line,$fs)"/>
+          <xsl:when test="substring($line, 1, 1) = '&quot;'">
+            <xsl:choose>
+              <xsl:when test="substring-before($line,'&quot;$fs') != ''">
+                <xsl:value-of select="substring-before($line,'&quot;$fs')"/>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:if test="substring-after($line, '&quot;$fs') = ''">
+                  <xsl:value-of select="substring-before(substring-after($line, '&quot;'), '&quot;')"/>
+                </xsl:if>
+              </xsl:otherwise>
+            </xsl:choose>
           </xsl:when>
+
           <xsl:otherwise>
-            <xsl:if test="substring-after($line, $fs) = ''">
-              <xsl:value-of select="$line"/>
-            </xsl:if>
+            <xsl:choose>
+              <xsl:when test="substring-before($line,$fs) != ''">
+                <xsl:value-of select="substring-before($line,$fs)"/>
+              </xsl:when>
+              <xsl:otherwise>
+                <xsl:if test="substring-after($line, $fs) = ''">
+                  <xsl:value-of select="$line"/>
+                </xsl:if>
+              </xsl:otherwise>
+            </xsl:choose>
           </xsl:otherwise>
         </xsl:choose>
       </xsl:otherwise>
     </xsl:choose>
+
   </xsl:template>
 </xsl:stylesheet>
-- 
cgit v1.2.3-70-g09d2