[Rt-commit] r14004 - in rt/3.8/branches/3.8.0-releng: lib/RT share/html/REST/1.0/Forms/ticket

[jesse at bestpractical.com]

Author: jesse
Date: Fri Jul 11 11:16:09 2008
New Revision: 14004

Modified:
   rt/3.8/branches/3.8.0-releng/lib/RT/Interface/REST.pm
   rt/3.8/branches/3.8.0-releng/lib/RT/Ticket_Overlay.pm
   rt/3.8/branches/3.8.0-releng/share/html/REST/1.0/Forms/ticket/history

Log:
 r39538 at 68-246-144-190 (orig r13942):  jesse | 2008-07-10 10:14:32 -0400
 * Cleaning up some uninit warnings.  Backing down some "critical" warnings which aren't to debug warning


Modified: rt/3.8/branches/3.8.0-releng/lib/RT/Interface/REST.pm
==============================================================================
--- rt/3.8/branches/3.8.0-releng/lib/RT/Interface/REST.pm	(original)
+++ rt/3.8/branches/3.8.0-releng/lib/RT/Interface/REST.pm	Fri Jul 11 11:16:09 2008
@@ -295,7 +295,7 @@
     my ($val) = @_;
     my ($line, $word, @words);
 
-    foreach $line (map {split /\n/} (ref $val eq 'ARRAY') ? @$val : $val)
+    foreach $line (map {split /\n/} (ref $val eq 'ARRAY') ? @$val : ($val||''))
     {
         # XXX: This should become a real parser, ? la Text::ParseWords.
         $line =~ s/^\s+//;

Modified: rt/3.8/branches/3.8.0-releng/lib/RT/Ticket_Overlay.pm
==============================================================================
--- rt/3.8/branches/3.8.0-releng/lib/RT/Ticket_Overlay.pm	(original)
+++ rt/3.8/branches/3.8.0-releng/lib/RT/Ticket_Overlay.pm	Fri Jul 11 11:16:09 2008
@@ -169,14 +169,14 @@
         my ($ticketid,$msg) = $self->LoadById($id);
 
         unless ($self->Id) {
-            $RT::Logger->crit("$self tried to load a bogus ticket: $id");
+            $RT::Logger->debug("$self tried to load a bogus ticket: $id");
             return (undef);
         }
     }
 
     #It's not a URI. It's not a numerical ticket ID. Punt!
     else {
-        $RT::Logger->warning("Tried to load a bogus ticket id: '$id'");
+        $RT::Logger->debug("Tried to load a bogus ticket id: '$id'");
         return (undef);
     }
 

Modified: rt/3.8/branches/3.8.0-releng/share/html/REST/1.0/Forms/ticket/history
==============================================================================
--- rt/3.8/branches/3.8.0-releng/share/html/REST/1.0/Forms/ticket/history	(original)
+++ rt/3.8/branches/3.8.0-releng/share/html/REST/1.0/Forms/ticket/history	Fri Jul 11 11:16:09 2008
@@ -148,7 +148,7 @@
 	my $attachlist;
 	my $attachments = $t->Attachments;
 	while (my $a = $attachments->Next) {
-	    my $size = length($a->Content);
+	    my $size = length($a->Content||'');
 	    if ($size > 1024) { $size  = int($size/102.4)/10 . "k" }
 	    else              { $size .= "b" }
 	    $attachlist .= "\n" . $a->Id.": ".($a->Filename || "untitled")." (".$size.")";