projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Now add files that the previous commit refered to
[spider.git]
/
cmd
/
show
/
contest.pl
diff --git
a/cmd/show/contest.pl
b/cmd/show/contest.pl
index 94d8402ad9b83249fbdc9f31652b4db2a74c71f8..a9db4ea7329ae7b2d3f827ad543c3f09ecc9337e 100644
(file)
--- a/
cmd/show/contest.pl
+++ b/
cmd/show/contest.pl
@@
-2,9
+2,8
@@
# used with 1 argument: sh/contest <yearandmonth>
# e g sh/contest 2002sep
# Tommy Johansson (SM3OSM) 2002-07-23
# used with 1 argument: sh/contest <yearandmonth>
# e g sh/contest 2002sep
# Tommy Johansson (SM3OSM) 2002-07-23
-# New version using Net::Telnet 2003-03-09
-#
#
#
+# New version use AsyncMsg (c) Dirk Koopman G1TLH
#
sub handle
#
sub handle
@@
-53,7
+52,7
@@
sub handle
dbg("sh/contest: url=$url") if isdbg("contest");
dbg("sh/contest: url=$url") if isdbg("contest");
- my $r =
HTTPMsg->get($self->call, $host, $port, $url
);
+ my $r =
AsyncMsg->get($self->call, $host, $url, prefix=>'ctst> '
);
if ($r) {
push @out, $self->msg('m21', "show/contest");
}
if ($r) {
push @out, $self->msg('m21', "show/contest");
}