[Rt-commit] r6233 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Thu Oct 19 11:28:52 2006
New Revision: 6233

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm

Log:
 r3973 at cubic-pc:  cubic | 2006-10-19 18:59:31 +0400
 * minor


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm	Thu Oct 19 11:28:52 2006
@@ -27,10 +27,11 @@
     my ($id, $msg) = $self->SUPER::Create(
         map { $_ => $args{$_} } qw(CustomField Name Description SortOrder)
     );
+    return ($id, $msg) unless $id;
 
-    if ( $id && length $args{Category} ) {
+    if ( defined $args{'Category'} && length $args{'Category'} ) {
         # $self would be loaded at this stage
-        my ($status, $msg) = $self->SetCategory( $args{Category} );
+        my ($status, $msg) = $self->SetCategory( $args{'Category'} );
         unless ( $status ) {
             $RT::Logger->error("Couldn't set category: $msg");
         }