"warrend@tek.com (via RT)" <perlbug-followup@perl.org> writes: > # New Ticket Created by warrend@tek.com > # Please include the string: [perl #24493] > # in the subject line of all future correspondence about this issue. > # <URL: http://rt.perl.org/rt2/Ticket/Display.html?id=24493 > > > > This is a bug report for perl from warrend@tek.com, > generated with the help of perlbug 1.34 running under perl v5.8.1. > > > ----------------------------------------------------------------- > [Please enter your report here] > > In perl-5.8.1 I tried the install.html target. It started to work and then > had the error shown below. > > It failed here in installhtml. $^X is ./perl but the current dir is in pod/perlfunc where > there is no perl > > > 415==> system($^X, $splitter, "../$filename") && > 416 warn "$0: error running '$splitter ../$filename'" > 417 ." from $podroot/$dirname"; > > I put links from perlfunc and perlipc back up to ../../perl and it then > worked. That is until it got to doing the index files. > > There it tried to do the destination perlfunc directory which wasn't there > since the source perlfunc directory was empty. It bombed out because it did > an open on a directory that wasn't there. > > I am not sure if perlfunc should have been empty or the code is not quite > right. > I think the better fix is this patch to installhtml: --- ../bleedperl/installhtml Wed Apr 2 23:51:39 2003 +++ ./installhtml Sun Nov 16 20:47:42 2003 @@ -392,6 +392,7 @@ sub split_on_item { print "splitting files by item.\n" if $verbose && $#splititem >= 0; $pwd = getcwd(); my $splitter = absolute_path($pwd, "$splitpod/splitpod"); + my $perl = absolute_path($pwd, $^X); foreach my $pod (@splititem) { # figure out the directory to split into $pod =~ s,^([^/]*)$,/$1,; @@ -412,7 +413,7 @@ sub split_on_item { die "$0: error changing to directory $podroot/$dirname: $!\n"; die "$splitter not found. Use '-splitpod dir' option.\n" unless -f $splitter; - system($^X, $splitter, "../$filename") && + system($perl, $splitter, "../$filename") && warn "$0: error running '$splitter ../$filename'" ." from $podroot/$dirname"; } Regards, Slaven -- Slaven Rezic - slaven@rezic.de tktimex - project time manager http://sourceforge.net/projects/ptktools/Thread Previous | Thread Next