[debian-users:18638] Re: ftpmirror failed.

[takeshi@xxxxxxxxxxxxxxxx]

たけしです
# 私のとこも potato 全部消えました

とりあえず、wu-ftpd-2.6 用の間に合わせパッチです
`ls .' の時に、pwd を取って full path にしてるだけ

--- ftpmirror.orig	Tue Oct 26 23:38:49 1999
+++ ftpmirror	Thu Oct 28 00:17:55 1999
@@ -758,14 +758,17 @@
   $d = $dir;
  }
 
+ my $kkk = $d;
+ if ($d eq ".") { $kkk = &ftp::pwd($d); }
+
  ;# get a list of remote directory
  if ($p->{'ftp-list-method'} ne 'list'
-  && defined($_ = &ftp::stat($d))) {
+  && defined($_ = &ftp::stat($kkk))) {
   1 while s/^2\d\d-[^\r\n]*\r?\n//;
   s/2\d\d [^\r\n]*\r?\n$//;
   @list = split(/\r?\n/); # remote entry
  } else { # use LIST otherwise
-  if (!(@list = &ftp::list($d))) { # remote entry
+  if (!(@list = &ftp::list($kkk))) { # remote entry
    log::putl("WARNING", "Can't get list of $dir"), return undef;
   }
  }

-- 
 村上 毅  takeshi@xxxxxxxxxxxxxxxx