Fix order printing overwriting the output format

Fixes #7378
ledgersmb · Jul 27, 2023 · 1a74bc2 · 1a74bc2
1 parent 0b880b6
commit 1a74bc2
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/old/bin/oe.pl b/old/bin/oe.pl
@@ -167,9 +167,9 @@ sub order_links {
 
 sub prepare_order {
     my %args          = @_;
-    $form->{format}   = "postscript" if $myconfig{printer};
-    $form->{media}    = $myconfig{printer};
-    $form->{formname} = $form->{type};
+    $form->{format}   //= "postscript" if $myconfig{printer};
+    $form->{media}    //= $myconfig{printer};
+    $form->{formname} //= $form->{type};
     $form->{sortby} ||= "runningnumber";
     $form->{currency} =~ s/ //g;
     $form->{oldcurrency} = $form->{currency};