From: Sven Schöling <s.schoeling@linet-services.de>
Date: Tue, 17 Jan 2012 12:46:27 +0000 (+0100)
Subject: L.date_tag: dem img tag kein onchange mitgeben falls übergeben.
X-Git-Tag: release-2.7.0beta1~44
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=08ed38c565d753ac7ee6ff97e7dc2f97ca92bec6;p=kivitendo-erp.git

L.date_tag: dem img tag kein onchange mitgeben falls übergeben.
---

diff --git a/SL/Template/Plugin/L.pm b/SL/Template/Plugin/L.pm
index be4b0a65a..bc3808820 100644
--- a/SL/Template/Plugin/L.pm
+++ b/SL/Template/Plugin/L.pm
@@ -282,7 +282,8 @@ sub date_tag {
     s/y+/\%Y/gi;
   } $::myconfig{"dateformat"};
 
-  my $cal_align =  delete $params{cal_align} || 'BR';
+  my $cal_align = delete $params{cal_align} || 'BR';
+  my $onchange  = delete $params{onchange};
   my $str_value = blessed $value ? $value->to_lxoffice : $value;
 
   $self->input_tag($name, $str_value,
@@ -290,6 +291,9 @@ sub date_tag {
     size   => 11,
     title  => _H($::myconfig{dateformat}),
     onBlur => 'check_right_date_format(this)',
+    ($onchange ? (
+    onChange => $onchange,
+    ) : ()),
     %params,
   ) . ((!$params{no_cal}) ?
   $self->html_tag('img', undef,