added defaults and thanks

This commit is contained in:
Max Baker
2003-07-24 00:25:36 +00:00
parent f57c9333da
commit 0d8aa25e63

View File

@@ -371,6 +371,11 @@ Subclass for Cisco Catalyst 3550 2/3 switches running IOS.
=back =back
=head2 Thanks
Thanks for testing and coding help (in no particular order) to :
Andy Ford, Brian Wilson, Jean-Philippe Luiggi, D<>na Watanabe
=head1 USAGE =head1 USAGE
=head2 Constructor =head2 Constructor
@@ -491,8 +496,8 @@ sub new {
$new_obj->{store} = $store; $new_obj->{store} = $store;
$new_obj->{sess} = $sess; $new_obj->{sess} = $sess;
$new_obj->{args} = \%args; $new_obj->{args} = \%args;
$new_obj->{snmp_ver} = $args{Version}; $new_obj->{snmp_ver} = $args{Version} || 2;
$new_obj->{snmp_comm} = $args{Community}; $new_obj->{snmp_comm} = $args{Community} || 'public';
return $auto_specific ? return $auto_specific ?
$new_obj->specify() : $new_obj; $new_obj->specify() : $new_obj;