Inventory: doku typos

[mfinanz.git] / SL / Form.pm

diff --git a/SL/Form.pm b/SL/Form.pm
index 9270c5555924b38f0ec34fc020c05fc19bb8ad2b..46c52cb91317d3a0c75b86d8008b23c3969a1283 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -385,6 +385,7 @@ sub create_http_response {
       $session_cookie = $cgi->cookie('-name'   => $main::auth->get_session_cookie_name(),
                                      '-value'  => $session_cookie_value,
                                      '-path'   => $uri->path,
       $session_cookie = $cgi->cookie('-name'   => $main::auth->get_session_cookie_name(),
                                      '-value'  => $session_cookie_value,
                                      '-path'   => $uri->path,

+                                     '-expire' => '+' . ($::lx_office_conf{authentication}->{session_timeout} // 60) . 'm',

                                      '-secure' => $::request->is_https);
     }
   }
                                      '-secure' => $::request->is_https);
     }
   }


@@ -700,7 +701,10 @@ sub sort_columns {
 }
 #
 
 }
 #
 

-sub format_amount { shift; goto &SL::Helper::Number::_number; }
+sub format_amount {
+  my ($self, $myconfig, $amount, $places, $dash) = @_;
+  SL::Helper::Number::_format_number($amount, $places, %$myconfig, dash => $dash);
+}

 
 sub format_amount_units {
   $main::lxdebug->enter_sub();
 
 sub format_amount_units {
   $main::lxdebug->enter_sub();


@@ -787,7 +791,10 @@ sub format_string {
 
 #
 
 
 #
 

-sub parse_amount { shift; goto &SL::Helper::Number::_parse_number; }
+sub parse_amount {
+  my ($self, $myconfig, $amount) = @_;
+  SL::Helper::Number::_parse_number($amount, %$myconfig);
+}

 
 sub round_amount { shift; goto &SL::Helper::Number::_round_number; }
 
 
 sub round_amount { shift; goto &SL::Helper::Number::_round_number; }