| Iwao KIMURA on Fri, 11 Dec 1998 17:39:41 +0900 |
[Date Prev] [Date Next] [Thread Prev] [Thread Next] [Date Index] [Thread Index]
| correction to gphelp |
Dear developers,
The following modification makes `perl -wc gphelp' into silence.
My perl is ``This is perl, version 5.005_54 built for i386-freebsd".
--------------------
amaki: {103} diff -uBb gphelp.org gphelp
--- gphelp.org Fri Dec 11 17:11:19 1998
+++ gphelp Fri Dec 11 17:12:13 1998
@@ -91,7 +91,7 @@
{
$transl{$1}="$2" if (/^([^ ]*) *(.*)/);
}
- close(<IN>);
+ close(IN);
$pipe = "cat";
foreach $suffix (keys %zcat)
@@ -244,7 +244,7 @@
else
{
$last_void = 0 ;
- split(/ /, $_);
+ @_ = split(/ /, $_);
for (@_)
{
s/@@/ /g; push(@w, $_);
--------------------
# I firstly sent same message to pari-dev-help, sorry.
;# Iwao KIMURA ;#
;# Institute of Mathematics, ;#
;# University of TSUKUBA, IBARAKI, JAPAN. ;#