[otrs-cvs] otrs/Kernel/Modules AdminPackageManager.pm,1.59,1.60

[CVS commits notifications of OTRS.org]

Comments:
Update of /home/cvs/otrs/Kernel/Modules
In directory lancelot:/tmp/cvs-serv3185/Kernel/Modules

Modified Files:
	AdminPackageManager.pm 
Log Message:
Fixed problem of quoted shown Intro* messages in package view, added Format tag.

Author: martin

Index: AdminPackageManager.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/Modules/AdminPackageManager.pm,v
retrieving revision 1.59
retrieving revision 1.60
diff -C2 -d -r1.59 -r1.60
*** AdminPackageManager.pm	14 Apr 2008 19:40:26 -0000	1.59
--- AdminPackageManager.pm	29 Apr 2008 21:58:07 -0000	1.60
***************
*** 278,281 ****
--- 278,284 ----
                      }
                      elsif ( $Key =~ /^(Intro)/ ) {
+                         if ( $Hash->{Format} && $Hash->{Format} =~ /plain/i ) {
+                             $Hash->{Content} = '<pre class="contentbody">' . $Hash->{Content} . '</pre>';
+                         }
                          $Self->{LayoutObject}->Block(
                              Name => "PackageItemIntro",
***************
*** 486,489 ****
--- 489,495 ----
                      }
                      elsif ( $Key =~ /^(Intro)/ ) {
+                         if ( $Hash->{Format} && $Hash->{Format} =~ /plain/i ) {
+                             $Hash->{Content} = '<pre class="contentbody">' . $Hash->{Content} . '</pre>';
+                         }
                          $Self->{LayoutObject}->Block(
                              Name => "PackageItemIntro",
***************
*** 1450,1453 ****
--- 1456,1462 ----
              }
              $Use = 1;
+             if ( $Tag->{Format} && $Tag->{Format} =~ /plain/i ) {
+                 $Tag->{Content} = '<pre class="contentbody">' . $Tag->{Content} . '</pre>';
+             }
              if ( !$Description && $Tag->{Lang} eq 'en' ) {
                  $Description = $Tag->{Content};