Changeset 29688

Timestamp:

Nov 5, 2010, 5:35:33 PM (16 years ago)

Author:

bills

Message:

from trunk. handle problem comments

File:

• tags/ipp-20101029/pstamp/scripts/pstamp_request_file (modified) (1 diff, 1 prop)

tags/ipp-20101029/pstamp/scripts/pstamp_request_file

@@ -271 +271 @@
             exit 1;
         }
-        $comment = "null" if !$comment;
+        if ($comment) {
+            if ($comment =~ /#/) {
+                print STDERR "WARNING '#' character removed from comment on line $line_num.\n";
+                $comment =~ s/#/ /;
+            }
+            if (length($comment) > 63) {
+                print STDERR "WARNING comment too long truncating to 63 characters on line $line_num.\n";
+                $comment = substr($comment, 0, 63);
+            }
+        } else {
+            $comment = "null";
+        }
         my @vals = split /$sep/, $spec;
         my $nvals = @vals;