Bug 19479: Display price in basket group formatted according to CurrencyFormat syspre...
[koha.git] / acqui / finishreceive.pl
index 484f562..8c1439c 100755 (executable)
@@ -20,8 +20,7 @@
 # You should have received a copy of the GNU General Public License
 # along with Koha; if not, see <http://www.gnu.org/licenses>.
 
-use strict;
-use warnings;
+use Modern::Perl;
 use CGI qw ( -utf8 );
 use C4::Auth;
 use C4::Output;
@@ -62,7 +61,7 @@ my $new_ordernumber  = $ordernumber;
 $unitprice = Koha::Number::Price->new( $unitprice )->unformat();
 my $basket = Koha::Acquisition::Orders->find( $ordernumber )->basket;
 
-#need old recievedate if we update the order, parcel.pl only shows the right parcel this way FIXME
+#need old receivedate if we update the order, parcel.pl only shows the right parcel this way FIXME
 if ($quantityrec > $origquantityrec ) {
     my @received_items = ();
     if ($basket->effective_create_items eq 'ordering') {