Diff for /loncom/lond between versions 1.106 and 1.108

version 1.106, 2003/01/15 04:43:14 version 1.108, 2003/02/03 18:03:52
Line 31 Line 31
 # 10/7,10/8,10/9,10/11,10/13,10/15,11/4,11/16,  # 10/7,10/8,10/9,10/11,10/13,10/15,11/4,11/16,
 # 12/7,12/15,01/06,01/11,01/12,01/14,2/8,  # 12/7,12/15,01/06,01/11,01/12,01/14,2/8,
 # 03/07,05/31 Gerd Kortemeyer  # 03/07,05/31 Gerd Kortemeyer
 # 06/26 Scott Harrison  
 # 06/29,06/30,07/14,07/15,07/17,07/20,07/25,09/18 Gerd Kortemeyer  # 06/29,06/30,07/14,07/15,07/17,07/20,07/25,09/18 Gerd Kortemeyer
 # 12/05 Scott Harrison  
 # 12/05,12/13,12/29 Gerd Kortemeyer  # 12/05,12/13,12/29 Gerd Kortemeyer
 # YEAR=2001  # YEAR=2001
 # Jan 01 Scott Harrison  
 # 02/12 Gerd Kortemeyer  # 02/12 Gerd Kortemeyer
 # 03/15 Scott Harrison  
 # 03/24 Gerd Kortemeyer  # 03/24 Gerd Kortemeyer
 # 04/02 Scott Harrison  
 # 05/11,05/28,08/30 Gerd Kortemeyer  # 05/11,05/28,08/30 Gerd Kortemeyer
 # 9/30,10/22,11/13,11/15,11/16 Scott Harrison  
 # 11/26,11/27 Gerd Kortemeyer  # 11/26,11/27 Gerd Kortemeyer
 # 12/20 Scott Harrison  
 # 12/22 Gerd Kortemeyer  # 12/22 Gerd Kortemeyer
 # YEAR=2002  # YEAR=2002
 # 01/20/02,02/05 Gerd Kortemeyer  # 01/20/02,02/05 Gerd Kortemeyer
 # 02/05 Guy Albertelli  # 02/05 Guy Albertelli
 # 02/07 Scott Harrison  
 # 02/12 Gerd Kortemeyer  # 02/12 Gerd Kortemeyer
 # 02/19 Matthew Hall  # 02/19 Matthew Hall
 # 02/25 Gerd Kortemeyer  # 02/25 Gerd Kortemeyer
 # 05/11 Scott Harrison  
 # 01/xx/2003 Ron Fox.. Remove preforking.  This makes the general daemon  # 01/xx/2003 Ron Fox.. Remove preforking.  This makes the general daemon
 #      logic simpler (and there were problems maintaining the preforked  #      logic simpler (and there were problems maintaining the preforked
 #      population).  Since the time averaged connection rate is close to zero  #      population).  Since the time averaged connection rate is close to zero
Line 1222  sub make_new_child { Line 1213  sub make_new_child {
                            print $client "error:$!\n";                             print $client "error:$!\n";
                        }                         }
 # ----------------------------------------------------------------- dumpcurrent  # ----------------------------------------------------------------- dumpcurrent
                    } elsif ($userinput =~ /^dumpcurrent/) {                     } elsif ($userinput =~ /^currentdump/) {
                        my ($cmd,$udom,$uname,$namespace)                         my ($cmd,$udom,$uname,$namespace)
                           =split(/:/,$userinput);                            =split(/:/,$userinput);
                        $namespace=~s/\//\_/g;                         $namespace=~s/\//\_/g;
Line 1244  sub make_new_child { Line 1235  sub make_new_child {
                               next if (exists($data{$symb}) &&                                 next if (exists($data{$symb}) && 
                                        exists($data{$symb}->{$param}) &&                                         exists($data{$symb}->{$param}) &&
                                        $data{$symb}->{'v.'.$param} > $v);                                         $data{$symb}->{'v.'.$param} > $v);
                               #&logthis("v = ".$v." p = ".$param." s = ".$symb);  
                               $data{$symb}->{$param}=$value;                                $data{$symb}->{$param}=$value;
                               $data{$symb}->{'v.'.$param}=$value;                                $data{$symb}->{'v.'.$param}=$v;
                            }                             }
                            if (untie(%hash)) {                             if (untie(%hash)) {
                              while (my ($symb,$param_hash) = each(%data)) {                               while (my ($symb,$param_hash) = each(%data)) {

Removed from v.1.106  
changed lines
  Added in v.1.108


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