X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/181b752d147e7f96bdd92560909f2f5f4e418635..85e36de2a319d0dbaa2e1572c16c9537d0d5f3ce:/bin/mozilla/io.pl

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index ad619b92d..64a59f7b0 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -34,6 +34,8 @@
 #######################################################################
 
 use SL::IC;
+use CGI::Ajax;
+use CGI;
 
 require "$form->{path}/common.pl";
 
@@ -2189,3 +2191,18 @@ sub relink_accounts {
 
   $lxdebug->leave_sub();
 }
+
+
+sub set_duedate {
+  $lxdebug->enter_sub();
+
+  $form->get_duedate(\%myconfig);
+
+  my $q = new CGI;
+  $result = "$form->{duedate}";
+  print $q->header();
+  print $result;
+  $lxdebug->leave_sub();
+
+}
+