diff --git a/Changes b/Changes index 7dfef64a..2bb8b527 100644 --- a/Changes +++ b/Changes @@ -3,6 +3,8 @@ DXUser::get*. This will break any third party addons or commands use these commands. 2. Change version to 1.55 +3. Drop the lower limit of 60m to 5100 after Dave G7RAU pointed out usage. +(see http://www.bandplans.com/index.php?band=60) 22Apr08======================================================================= 1. Added two Xmas Is calls. 15Apr08======================================================================= diff --git a/data/bands.pl b/data/bands.pl index 534f4ec2..dad639e2 100644 --- a/data/bands.pl +++ b/data/bands.pl @@ -36,7 +36,7 @@ ssb => [ 3601, 4000 ] }, 'Bands'), - '60m' => bless( { band => [ 5258, 5410], + '60m' => bless( { band => [ 5100, 5410], ssb => [5300, 5410], }, 'Bands' ), diff --git a/html/program.html b/html/program.html index f810d2ec..9b6262ec 100644 --- a/html/program.html +++ b/html/program.html @@ -232,7 +232,7 @@ return (1, $self->msg('e5')) if $self->priv < 9; foreach $call (@args) { $call = uc $call; - if ($ref = DXUser->get_current($call)) { + if ($ref = DXUser::get_current($call)) { $ref->passwd($pass); $ref->put(); push @out, $self->msg("password", $call); @@ -303,11 +303,11 @@ return (1, @out)
diff --git a/perl/Version.pm b/perl/Version.pm index e7668d52..9e7e4a41 100644 --- a/perl/Version.pm +++ b/perl/Version.pm @@ -11,6 +11,6 @@ use vars qw($version $subversion $build); $version = '1.55'; $subversion = '0'; -$build = '2'; +$build = '3'; 1;