[Rt-commit] r5020 - in rtir/branches/1.9-EXPERIMENTAL: html/RTIR/Search/Elements

[ruz at bestpractical.com]

Author: ruz
Date: Tue Apr 11 18:10:31 2006
New Revision: 5020

Modified:
   rtir/branches/1.9-EXPERIMENTAL/   (props changed)
   rtir/branches/1.9-EXPERIMENTAL/html/RTIR/Search/Elements/PickCFs

Log:
 r1288 at cubic-pc:  cubic | 2006-04-12 02:13:43 +0400
 * add description of the RTIR CFs to the QB page in span tag with label-comment class


Modified: rtir/branches/1.9-EXPERIMENTAL/html/RTIR/Search/Elements/PickCFs
==============================================================================
--- rtir/branches/1.9-EXPERIMENTAL/html/RTIR/Search/Elements/PickCFs	(original)
+++ rtir/branches/1.9-EXPERIMENTAL/html/RTIR/Search/Elements/PickCFs	Tue Apr 11 18:10:31 2006
@@ -74,6 +74,11 @@
 while ( my $CustomField = $CustomFields->Next ) {
     my $label = $CustomField->Name;
     $label =~ s/^_RTIR_//; # XXX: add queue name to label
+    $label = $m->interp->apply_escapes($label, 'h');
+    if ( my $desc = $CustomField->Description ) {
+        $desc = $m->interp->apply_escapes($desc, 'h');
+        $label .= qq{<br><span class="label-comment">($desc)</span>};
+    }
 
     my %line;
     $line{'Name'} = "'CF.{" . $CustomField->Name . "}'";