package NGCP::Panel::Form::Customer::PbxAdminSubscriber; use HTML::FormHandler::Moose; use NGCP::Panel::Field::PosInteger; extends 'NGCP::Panel::Form::Customer::PbxSubscriber'; has_field 'e164' => ( type => '+NGCP::Panel::Field::E164', order => 99, required => 0, label => 'E.164 Number', do_label => 1, do_wrapper => 1, ); has_field 'domain' => ( type => '+NGCP::Panel::Field::Domain', label => 'SIP Domain', not_nullable => 1, ); has_block 'fields' => ( tag => 'div', class => [qw/modal-body/], render_list => [qw/domain e164 display_name webusername webpassword username password status external_id/ ], ); 1; =head1 NAME NGCP::Panel::Form::Subscriber =head1 DESCRIPTION Form to modify a subscriber. =head1 METHODS =head1 AUTHOR Gerhard Jungwirth =head1 LICENSE This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself. =cut # vim: set tabstop=4 expandtab: