/[irc-logger]/trunk/bin/irc-logger.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/bin/irc-logger.pl

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

revision 31 by dpavlin, Sat Jun 17 17:23:26 2006 UTC revision 32 by dpavlin, Mon Jun 19 11:32:16 2006 UTC
# Line 507  sub add_tag { Line 507  sub add_tag {
507                  next if (! $tag || $tag =~ m/https?:/i);                  next if (! $tag || $tag =~ m/https?:/i);
508                  push @{ $tags->{$tag} }, $arg->{id};                  push @{ $tags->{$tag} }, $arg->{id};
509                  warn "+tag $tag: $arg->{id}\n";                  warn "+tag $tag: $arg->{id}\n";
510                    $cloud->add($tag, "?tag=$tag", scalar @{$tags->{$tag}} + 1);
511          }          }
512  }  }
513    
# Line 583  sub root_handler { Line 584  sub root_handler {
584                  $cloud->css .                  $cloud->css .
585                  qq{</style></head><body>} .                  qq{</style></head><body>} .
586                  qq{                  qq{
587                  <form method="post" class="search">                  <form method="post" class="search" action="/">
588                  <input type="text" name="search" value="$search" size="10">                  <input type="text" name="search" value="$search" size="10">
589                  <input type="submit" value="search">                  <input type="submit" value="search">
590                  </form>                  </form>

Legend:
Removed from v.31  
changed lines
  Added in v.32

  ViewVC Help
Powered by ViewVC 1.1.26