[otrs-cvs] ITSMConfigurationManagement/Kernel/Output/HTML ITSMConfigItemLayoutTextArea.pm, 1.14, 1.15

Comments:
Update of /home/cvs/ITSMConfigurationManagement/Kernel/Output/HTML
In directory lancelot:/tmp/cvs-serv11204/Kernel/Output/HTML

Modified Files:
	ITSMConfigItemLayoutTextArea.pm 
Log Message:
Fixed bug# 8734 - Saving searches not possible for TextAreas.

Author: ub

Index: ITSMConfigItemLayoutTextArea.pm
===================================================================
RCS file: /home/cvs/ITSMConfigurationManagement/Kernel/Output/HTML/ITSMConfigItemLayoutTextArea.pm,v
retrieving revision 1.14
retrieving revision 1.15
diff -2 -u -d -r1.14 -r1.15
--- ITSMConfigItemLayoutTextArea.pm	12 Jan 2011 11:21:14 -0000	1.14
+++ ITSMConfigItemLayoutTextArea.pm	14 Jan 2013 14:58:50 -0000	1.15
@@ -1,5 +1,5 @@
 # --
 # Kernel/Output/HTML/ITSMConfigItemLayoutTextArea.pm - layout backend module
-# Copyright (C) 2001-2011 OTRS AG, http://otrs.org/
+# Copyright (C) 2001-2013 OTRS AG, http://otrs.org/
 # --
 # $Id$
@@ -229,6 +229,11 @@
 
     # get form data
-    my $Value = $Self->{ParamObject}->GetParam( Param => $Param{Key} );
-
+    my $Value;
+    if ( $Param{Value} ) {
+        $Value = $Param{Value};
+    }
+    else {
+        $Value = $Self->{ParamObject}->GetParam( Param => $Param{Key} );
+    }
     return $Value;
 }
@@ -264,5 +269,5 @@
     }
 
-    my $String = qq{<input type="Text" name="$Param{Key}" value="$Value" class="W50pc">};
+    my $String = qq{<input type="text" name="$Param{Key}" value="$Value" class="W50pc">};
 
     return $String;
---------------------------------------------------------------------
OTRS mailing list: cvs-log - Webpage: http://otrs.org/
Archive: http://lists.otrs.org/pipermail/cvs-log
To unsubscribe: http://lists.otrs.org/cgi-bin/listinfo/cvs-log