[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/acqui basket.pl [rel_2_2]
From: |
Owen Leonard |
Subject: |
[Koha-cvs] koha/acqui basket.pl [rel_2_2] |
Date: |
Wed, 13 Sep 2006 18:27:13 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_2_2
Changes by: Owen Leonard <oleonard> 06/09/13 18:27:13
Modified files:
acqui : basket.pl
Log message:
Formatting currency display to 2 decimal places. Enabling GST system
preference to control display of GST values
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/acqui/basket.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.24.2.11&r2=1.24.2.12
Patches:
Index: basket.pl
===================================================================
RCS file: /sources/koha/koha/acqui/basket.pl,v
retrieving revision 1.24.2.11
retrieving revision 1.24.2.12
diff -u -b -r1.24.2.11 -r1.24.2.12
--- basket.pl 2 Aug 2006 08:33:20 -0000 1.24.2.11
+++ basket.pl 13 Sep 2006 18:27:12 -0000 1.24.2.12
@@ -1,6 +1,6 @@
#!/usr/bin/perl
-# $Id: basket.pl,v 1.24.2.11 2006/08/02 08:33:20 tipaul Exp $
+# $Id: basket.pl,v 1.24.2.12 2006/09/13 18:27:12 oleonard Exp $
#script to show display basket of orders
#written by address@hidden 24/2/2000
@@ -134,16 +134,14 @@
entrydate =>
format_date($results[0]->{'entrydate'}),
books_loop => address@hidden,
count =>$count,
- sub_total => $sub_total,
- gist => $gist,
- grand_total =>$grand_total,
- sub_total_est => $sub_total_est,
- gist_est => $gist_est,
- grand_total_est =>$grand_total_est,
+ sub_total => sprintf("%.2f",$sub_total),
+ gist => sprintf("%.2f",$gist),
+ grand_total =>sprintf("%.2f",$grand_total),
+ sub_total_est => sprintf("%.2f",$sub_total_est),
+ gist_est => sprintf("%.2f",$gist_est),
+ grand_total_est
=>sprintf("%.2f",$grand_total_est),
currency => $booksellers[0]->{'listprice'},
qty_total => $qty_total,
- intranetcolorstylesheet =>
C4::Context->preference("intranetcolorstylesheet"),
- intranetstylesheet =>
C4::Context->preference("intranetstylesheet"),
- IntranetNav => C4::Context->preference("IntranetNav"),
+ GST => C4::Context->preference("gist"),
);
output_html_with_http_headers $query, $cookie, $template->output;
- [Koha-cvs] koha/acqui basket.pl [rel_2_2],
Owen Leonard <=