Author: corsepiu Update of /cvs/pkgs/rpms/rt3/F-11 In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv16227/F-11 Modified Files: rt-3.8.2-rh-bz526870.diff Log Message: Remove patch backup. rt-3.8.2-rh-bz526870.diff: ShowCustomFields | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) Index: rt-3.8.2-rh-bz526870.diff =================================================================== RCS file: /cvs/pkgs/rpms/rt3/F-11/rt-3.8.2-rh-bz526870.diff,v retrieving revision 1.1 retrieving revision 1.2 diff -u -p -r1.1 -r1.2 --- rt-3.8.2-rh-bz526870.diff 12 Oct 2009 15:36:17 -0000 1.1 +++ rt-3.8.2-rh-bz526870.diff 12 Oct 2009 16:11:39 -0000 1.2 @@ -10,121 +10,3 @@ diff -Naur rt-3.8.2.orig/share/html/Elem } $m->out('</a>') if $linked; -diff -Naur rt-3.8.2.orig/share/html/Elements/ShowCustomFields.orig rt-3.8.2/share/html/Elements/ShowCustomFields.orig ---- rt-3.8.2.orig/share/html/Elements/ShowCustomFields.orig 1970-01-01 01:00:00.000000000 +0100 -+++ rt-3.8.2/share/html/Elements/ShowCustomFields.orig 2009-01-07 02:15:28.000000000 +0100 -@@ -0,0 +1,114 @@ -+%# BEGIN BPS TAGGED BLOCK {{{ -+%# -+%# COPYRIGHT: -+%# -+%# This software is Copyright (c) 1996-2009 Best Practical Solutions, LLC -+%# <jesse@xxxxxxxxxxxxxxxxx> -+%# -+%# (Except where explicitly superseded by other copyright notices) -+%# -+%# -+%# LICENSE: -+%# -+%# This work is made available to you under the terms of Version 2 of -+%# the GNU General Public License. A copy of that license should have -+%# been provided with this software, but in any event can be snarfed -+%# from www.gnu.org. -+%# -+%# This work is distributed in the hope that it will be useful, but -+%# WITHOUT ANY WARRANTY; without even the implied warranty of -+%# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -+%# General Public License for more details. -+%# -+%# You should have received a copy of the GNU General Public License -+%# along with this program; if not, write to the Free Software -+%# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA -+%# 02110-1301 or visit their web page on the internet at -+%# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html. -+%# -+%# -+%# CONTRIBUTION SUBMISSION POLICY: -+%# -+%# (The following paragraph is not intended to limit the rights granted -+%# to you to modify and distribute this software under the terms of -+%# the GNU General Public License and is only of importance to you if -+%# you choose to contribute your changes and enhancements to the -+%# community by submitting them to Best Practical Solutions, LLC.) -+%# -+%# By intentionally submitting any modifications, corrections or -+%# derivatives to this work, or any other work intended for use with -+%# Request Tracker, to Best Practical Solutions, LLC, you confirm that -+%# you are the copyright holder for those contributions and you grant -+%# Best Practical Solutions, LLC a nonexclusive, worldwide, irrevocable, -+%# royalty-free, perpetual, license to use, copy, create derivative -+%# works based on those contributions, and sublicense and distribute -+%# those contributions and any derivatives thereof. -+%# -+%# END BPS TAGGED BLOCK }}} -+<table> -+% while ( my $CustomField = $CustomFields->Next ) { -+% my $Values = $Object->CustomFieldValues( $CustomField->Id ); -+% my $count = $Values->Count; -+ <tr id="CF-<%$CustomField->id%>-ShowRow"> -+ <td class="label"><% $CustomField->Name %>:</td> -+ <td class="value"> -+% unless ( $count ) { -+<i><&|/l&>(no value)</&></i> -+% } elsif ( $count == 1 ) { -+% $print_value->( $CustomField, $Values->First ); -+% } else { -+<ul> -+% while ( my $Value = $Values->Next ) { -+<li> -+% $print_value->( $CustomField, $Value ); -+</li> -+% } -+</ul> -+% } -+ </td> -+ </tr> -+% } -+</table> -+<%INIT> -+my $CustomFields = $Object->CustomFields; -+$m->callback( CallbackName => 'MassageCustomFields', CustomFields => $CustomFields ); -+ -+my $print_value = sub { -+ my ($cf, $value) = @_; -+ my $linked = $cf->LinkValueTo; -+ if ( $linked ) { -+ $m->out('<a href="'. $value->LinkValueTo .'" target="_new">'); -+ } -+ my $comp = "ShowCustomField". $cf->Type; -+ $m->callback( -+ CallbackName => 'ShowComponentName', -+ Name => \$comp, -+ CustomField => $cf, -+ Object => $Object, -+ ); -+ if ( $m->comp_exists( $comp ) ) { -+ $m->comp( $comp, Object => $value ); -+ } else { -+ $m->print( $value->Content ); -+ } -+ $m->out('</a>') if $linked; -+ -+ # This section automatically populates a div with the "IncludeContentForValue" for this custom -+ # field if it's been defined -+ if ( $cf->IncludeContentForValue ) { -+ my $vid = $value->id; -+ $m->out( '<div class="object_cf_value_include" id="object_cf_value_'. $vid .'">' ); -+ $m->print( loc("See also:") ); -+ $m->out( '<a href="'. $value->IncludeContentForValue .'">' ); -+ $m->print( $value->IncludeContentForValue ); -+ $m->out( qq{</a></div>\n} ); -+ $m->out( qq{<script><!--\nahah('} ); -+ $m->print( $value->IncludeContentForValue ); -+ $m->out( qq{', 'object_cf_value_$vid');\n--></script>\n} ); -+ } -+}; -+ -+</%INIT> -+<%ARGS> -+$Object => undef -+</%ARGS> -- Fedora Extras Perl SIG http://www.fedoraproject.org/wiki/Extras/SIGs/Perl Fedora-perl-devel-list mailing list Fedora-perl-devel-list@xxxxxxxxxx https://www.redhat.com/mailman/listinfo/fedora-perl-devel-list