[Rt-commit] r20032 - rt/3.8/trunk/lib/RT

[falcone at bestpractical.com]

Author: falcone
Date: Fri Jun 19 15:21:10 2009
New Revision: 20032

Modified:
   rt/3.8/trunk/lib/RT/CustomFieldValue_Overlay.pm

Log:
Add some documentation

Modified: rt/3.8/trunk/lib/RT/CustomFieldValue_Overlay.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/CustomFieldValue_Overlay.pm	(original)
+++ rt/3.8/trunk/lib/RT/CustomFieldValue_Overlay.pm	Fri Jun 19 15:21:10 2009
@@ -100,12 +100,25 @@
     return ($id, $msg);
 }
 
+=head2 Category
+
+Returns the Category assigned to this Value
+Returns udef if there is no Category
+
+=cut
+
 sub Category {
     my $self = shift;
     my $attr = $self->FirstAttribute('Category') or return undef;
     return $attr->Content;
 }
 
+=head2 SetCategory Category
+
+Takes a string Category and stores it as an attribute of this CustomFieldValue
+
+=cut
+
 sub SetCategory {
     my $self = shift;
     my $category = shift;