projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
5b3f4e2
)
altered wcy display a bit
author
minima
<minima>
Mon, 27 Nov 2000 09:23:16 +0000
(09:23 +0000)
committer
minima
<minima>
Mon, 27 Nov 2000 09:23:16 +0000
(09:23 +0000)
Changes
patch
|
blob
|
history
perl/WCY.pm
patch
|
blob
|
history
diff --git
a/Changes
b/Changes
index f9fcf1a32802037af7962b92bd0e9d5922ac1b3e..1037946f798ea20721eeb755bb216e3c8ec14068 100644
(file)
--- a/
Changes
+++ b/
Changes
@@
-1,3
+1,5
@@
+27Nov00=======================================================================
+1. alter sh/wcy output slightly
26Nov00=======================================================================
1. made it possible for sysop calls to be used on other nodes and still have
anti loop checking on PC16/17.
26Nov00=======================================================================
1. made it possible for sysop calls to be used on other nodes and still have
anti loop checking on PC16/17.
diff --git
a/perl/WCY.pm
b/perl/WCY.pm
index f3202dd4c7451dbe536385dd20a672bccffc37a2..06f41d2d9d394cc0348ea932977390d6c171d05e 100644
(file)
--- a/
perl/WCY.pm
+++ b/
perl/WCY.pm
@@
-195,7
+195,7
@@
sub print_item
my $d = cldate($r->[0]);
my $t = (gmtime($r->[0]))[2];
my $d = cldate($r->[0]);
my $t = (gmtime($r->[0]))[2];
- return sprintf("$d %02d %5d %3d %3d %3d %3d %-5s %-5s
%-3
s <%s>",
+ return sprintf("$d %02d %5d %3d %3d %3d %3d %-5s %-5s
%6
s <%s>",
$t, @$r[1..9]);
}
$t, @$r[1..9]);
}