Changeset ef4700c

Timestamp:

Apr 16, 2010, 6:04:05 PM (14 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

master, release-1.10, release-1.6, release-1.7, release-1.8, release-1.9

Children:

75b0adb

Parents:

6e58ff2

git-author:

Nelson Elhage <nelhage@mit.edu> (04/08/10 22:07:19)

git-committer:

Nelson Elhage <nelhage@mit.edu> (04/16/10 18:04:05)

Message:

Properly quote strings containing newlines or tabs.

Files:

• perl/lib/BarnOwl.pm (modified) (1 diff)
• text.c (modified) (1 diff)

perl/lib/BarnOwl.pm

@@ -363 +363 @@
         if ($str eq '') {
             push @quoted, "''";
-        } elsif ($str !~ /['" ]/) {
+        } elsif ($str !~ /['" \n\t]/) {
             push @quoted, "$str";
         } elsif ($str !~ /'/) {

text.c

@@ -271 +271 @@
   if (strchr(line, '\'')) return("\"");
   if (strchr(line, '"')) return("'");
-  if (strchr(line, ' ')) return("'");
+  if (strcspn(line, "\n\t ") != strlen(line)) return("'");
   return("");
 }