make the time stored on dups generated locally on spots an integer no of

minutes * 60

diff --git a/Changes b/Changes
index 158f9b680fb1787477a4338d5067449b63ac3087..33ac9a0070d0b2aff5e8c6d6285660cf1198ffeb 100644 (file)
--- a/Changes
+++ b/Changes
@@ -2,7 +2,9 @@
 1. made sure that 'en' is the default language on new users.
 2. issue error message if shutdown is attempted by a low privileged user.
 3. Make sure a privilege is defined for all users (even if it is 0).
 1. made sure that 'en' is the default language on new users.
 2. issue error message if shutdown is attempted by a low privileged user.
 3. Make sure a privilege is defined for all users (even if it is 0).

-4. Try to fix some more dups (and the time on time).
+4. Try to fix some more dups (and the time on them).
+5. make the time stored on dups generated locally on spots an integer no of 
+minutes * 60 

 26Jul00=======================================================================
 1. added wantgrid (to control display of grid square info on DX Broadcasts)
 2. added lastoper for controlling periodic demands for user info from other
 26Jul00=======================================================================
 1. added wantgrid (to control display of grid square info on DX Broadcasts)
 2. added lastoper for controlling periodic demands for user info from other

diff --git a/cmd/dx.pl b/cmd/dx.pl
index 3a45f6ce86f35c35f0542700c5642b0bf76fb1d5..2ea40672ad044dbb8b3e7a468b0d4090f9516a5e 100644 (file)
--- a/cmd/dx.pl
+++ b/cmd/dx.pl
@@ -100,7 +100,7 @@ if (grep $_ eq $spotted, @DXProt::baddx) {
        my $buf = Spot::formatb($self->user->wantgrid, $freq, $spotted, $main::systime, $line, $spotter);
        push @out, $buf;
 } else {
        my $buf = Spot::formatb($self->user->wantgrid, $freq, $spotted, $main::systime, $line, $spotter);
        push @out, $buf;
 } else {

-       return (1, $self->msg('dup')) if Spot::dup($freq, $spotted, $main::systime, $line);
+       return (1, $self->msg('dup')) if Spot::dup($freq, $spotted, (int ($main::systime/60)) * 60, $line);

        my @spot = Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall);
        if (@spot) {
                # send orf to the users
        my @spot = Spot::add($freq, $spotted, $main::systime, $line, $spotter, $main::mycall);
        if (@spot) {
                # send orf to the users