X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e1c3b6b77d4407069cb09897a9e79cd8686e41bf..70654da:/bin/mozilla/io.pl

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index f42db4654..742a7ffd1 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -507,7 +507,8 @@ sub select_item {
   $::form->header;
 
   my @item_list = map {
-    $_->{display_sellprice} /= $_->{price_factor} if ($_->{price_factor});
+    # maybe there is a better backend function or way to calc
+    $_->{display_sellprice} = ($_->{price_factor}) ? $_->{sellprice} / $_->{price_factor} : $_->{sellprice};
     $_;
   } @{ $::form->{item_list} };
 
@@ -1117,7 +1118,7 @@ sub print_options {
   $form->{PD}{ $form->{formname} } = "selected";
   $form->{DF}{ $form->{format} }   = "selected";
   $form->{OP}{ $form->{media} }    = "selected";
-  $form->{SM}{ $form->{formname} } = "selected";
+  $form->{SM}{ $form->{sendmode} } = "selected";
 
   push @FORMNAME, grep $_,
     ($form->{type} eq 'purchase_order') ? (