/[mws]/trunk/httpd.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/httpd.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 41 by dpavlin, Mon May 10 20:26:17 2004 UTC revision 42 by dpavlin, Mon May 10 22:04:01 2004 UTC
# Line 106  while ( my $c = $d->accept ) { Line 106  while ( my $c = $d->accept ) {
106    
107                  # XXX LOG                  # XXX LOG
108                  print $r->method," ",$url,"\n";                  print $r->method," ",$url,"\n";
109                  print Dumper($param),"\n" if ($debug);                  print Dumper($param,$mws->{counter}),"\n" if ($debug);
110    
111                  # is this static page?                  # is this static page?
112                  if ($static_html && -f "$static_html/$url") {                  if ($static_html && -f "$static_html/$url") {
# Line 203  while ( my $c = $d->accept ) { Line 203  while ( my $c = $d->accept ) {
203    
204    
205                  # push counters to template                  # push counters to template
206                  foreach my $f (qw(from to cc bcc)) {                  foreach my $f (qw(from to cc bcc folder)) {
207                          my $h = $mws->counter($f) || next;                          my $h = $mws->counter($f) || next;
208                          my @a;                          my @a;
209                          foreach my $k (sort { $h->{$b}->{usage} <=> $h->{$a}->{usage} } keys %$h) {                          foreach my $k (sort { $h->{$b}->{usage} <=> $h->{$a}->{usage} } keys %$h) {
Legend:
Removed from v.41  
changed lines
  Added in v.42
  ViewVC Help
Powered by ViewVC 1.1.26