summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/Mason.pm1
-rw-r--r--FS/FS/svc_cable.pm2
-rw-r--r--FS/FS/svc_video.pm2
3 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm
index 7d0a3f5e9..4b50e9780 100644
--- a/FS/FS/Mason.pm
+++ b/FS/FS/Mason.pm
@@ -98,6 +98,7 @@ if ( -e $addl_handler_use_file ) {
use Business::CreditCard 0.30; #for mask-aware cardtype()
use NetAddr::IP;
+ use Net::MAC::Vendor;
use Net::Ping;
use Net::Ping::External;
#if CPAN #7815 ever gets fixed# if ( $Net::Ping::External::VERSION <= 0.12 )
diff --git a/FS/FS/svc_cable.pm b/FS/FS/svc_cable.pm
index 12a1dbba5..4dd454351 100644
--- a/FS/FS/svc_cable.pm
+++ b/FS/FS/svc_cable.pm
@@ -98,7 +98,7 @@ sub table_info {
type => 'input-mac_addr',
value_callback => sub {
my $svc = shift;
- join(':', $svc->mac_addr =~ /../g);
+ $svc->mac_addr_formatted('U',':');
},
},
;
diff --git a/FS/FS/svc_video.pm b/FS/FS/svc_video.pm
index 999b87c66..6db27c705 100644
--- a/FS/FS/svc_video.pm
+++ b/FS/FS/svc_video.pm
@@ -92,7 +92,7 @@ sub table_info {
type => 'input-mac_addr',
value_callback => sub {
my $svc = shift;
- join(':', $svc->mac_addr =~ /../g);
+ $svc->mac_addr_formatted('U',':');
},
},
'duration' => { label => 'Duration (days)',