Diff for /loncom/lond between versions 1.122 and 1.123

version 1.122, 2003/03/28 18:26:28 version 1.123, 2003/03/28 20:40:52
Line 1843  sub getchat { Line 1843  sub getchat {
  @entries=map { $_.':'.$hash{$_} } sort keys %hash;   @entries=map { $_.':'.$hash{$_} } sort keys %hash;
  untie %hash;   untie %hash;
     }      }
       $cutoff=time-60;
       if (tie(%hash,'GDBM_File',"$proname/nohist_inchatroom.db",
       &GDBM_READER(),0640)) {
    $hash{$uname.':'.$undom}=time;
           foreach (sort keys %hash) {
       if ($hash{$_}>$cutoff) {
    $entries[$#entries+1]='active_participant:'.$_;
               }
           }
           untie %hash;
       }
     return @entries;      return @entries;
 }  }
   

Removed from v.1.122  
changed lines
  Added in v.1.123


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>