projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
defined(@array) is deprecated
[freeside.git]
/
FS
/
FS
/
Mason.pm
diff --git
a/FS/FS/Mason.pm
b/FS/FS/Mason.pm
index
90ced1f
..
88198dd
100644
(file)
--- a/
FS/FS/Mason.pm
+++ b/
FS/FS/Mason.pm
@@
-121,6
+121,8
@@
if ( -e $addl_handler_use_file ) {
use HTML::Widgets::SelectLayers 0.07; #should go away in favor of
#selectlayers.html
use Locale::Country;
use HTML::Widgets::SelectLayers 0.07; #should go away in favor of
#selectlayers.html
use Locale::Country;
+ use Locale::Currency;
+ use Locale::Currency::Format;
use Business::US::USPS::WebTools::AddressStandardization;
use Geo::GoogleEarth::Pluggable;
use LWP::UserAgent;
use Business::US::USPS::WebTools::AddressStandardization;
use Geo::GoogleEarth::Pluggable;
use LWP::UserAgent;
@@
-313,7
+315,6
@@
if ( -e $addl_handler_use_file ) {
use FS::tower;
use FS::tower_sector;
use FS::sales;
use FS::tower;
use FS::tower_sector;
use FS::sales;
- use FS::access_groupsales;
use FS::contact_class;
use FS::part_svc_class;
use FS::upload_target;
use FS::contact_class;
use FS::part_svc_class;
use FS::upload_target;
@@
-341,6
+342,16
@@
if ( -e $addl_handler_use_file ) {
use FS::part_pkg_msgcat;
use FS::svc_cable;
use FS::cable_device;
use FS::part_pkg_msgcat;
use FS::svc_cable;
use FS::cable_device;
+ use FS::agent_currency;
+ use FS::currency_exchange;
+ use FS::part_pkg_currency;
+ use FS::cust_payby;
+ use FS::vend_main;
+ use FS::vend_class;
+ use FS::vend_bill;
+ use FS::vend_pay;
+ use FS::vend_bill_pay;
+ use FS::sales_pkg_class;
# Sammath Naur
if ( $FS::Mason::addl_handler_use ) {
# Sammath Naur
if ( $FS::Mason::addl_handler_use ) {
@@
-411,7
+422,7
@@
if ( -e $addl_handler_use_file ) {
use vars qw($m);
# false laziness w/below
use vars qw($m);
# false laziness w/below
- if (
defined(@DBIx::Profile::ISA)
) {
+ if (
@DBIx::Profile::ISA
) {
if ( $FS::CurrentUser::CurrentUser->option('show_db_profile') ) {
if ( $FS::CurrentUser::CurrentUser->option('show_db_profile') ) {
@@
-471,7
+482,7
@@
if ( -e $addl_handler_use_file ) {
use vars qw($m);
$m->clear_buffer;
#false laziness w/above
use vars qw($m);
$m->clear_buffer;
#false laziness w/above
- if (
defined(@DBIx::Profile::ISA)
) {
+ if (
@DBIx::Profile::ISA
) {
if ( $FS::CurrentUser::CurrentUser->option('show_db_profile') ) {
if ( $FS::CurrentUser::CurrentUser->option('show_db_profile') ) {