Master to 4.2.8
[usit-rt.git] / share / html / Elements / EditCustomFieldCustomGroupings
index 6e32436..cb7484c 100644 (file)
 %# those contributions and any derivatives thereof.
 %#
 %# END BPS TAGGED BLOCK }}}
-% foreach my $group ( RT::CustomField->CustomGroupings( $Object ), '' ) {
+% foreach my $group ( @Groupings ) {
 <&| /Widgets/TitleBox,
     title => $group? loc($group) : loc('Custom Fields'),
     class => $css_class .' '. ($group? CSSClass("$css_class-$group") : ''),
+    ($group ? (id => CSSClass("$css_class-$group")) : ()),
     hide_empty => 1,
     %$TitleBoxARGS,
 &>
@@ -59,6 +60,7 @@
 <%ARGS>
 $Object
 $CustomFieldGenerator => undef,
+@Groupings => (RT::CustomField->CustomGroupings( $Object ), '')
 </%ARGS>
 <%INIT>
 my $css_class = lc(ref($Object)||$Object);