[Rt-commit] r2892 - rt/branches/CHALDEA-EXPERIMENTAL/lib/RT

[autrijus at bestpractical.com]

Author: autrijus
Date: Wed May 18 08:47:05 2005
New Revision: 2892

Modified:
   rt/branches/CHALDEA-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm
Log:
* $cfv->Category and $cfv->SetCategory, via attributes.

Modified: rt/branches/CHALDEA-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm
==============================================================================
--- rt/branches/CHALDEA-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm	(original)
+++ rt/branches/CHALDEA-EXPERIMENTAL/lib/RT/CustomFieldValue_Overlay.pm	Wed May 18 08:47:05 2005
@@ -35,13 +35,14 @@
 
 sub Category {
     my $self = shift;
-    return '';
+    my $attr = $self->FirstAttribute('Category') or return undef;
+    return $attr->Content;
 }
 
 sub SetCategory {
     my $self = shift;
     my $category = shift;
-    return (0, '');
+    $self->SetAttribute(Name => 'Category', Content => $category);
 }
 
 sub ValidateName { 1 };