diff options
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/Mason.pm | 1 | ||||
-rw-r--r-- | FS/FS/svc_cable.pm | 2 | ||||
-rw-r--r-- | FS/FS/svc_video.pm | 2 |
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)', |