1. Shlomi Fish
  2. thewml.org-site

Commits

Shlomi Fish  committed 9ecc633

Fixed the filelist - turns out Embperl doesn't chdir() to the script's
directory by default.

  • Participants
  • Parent commits 667e323
  • Branches default

Comments (0)

Files changed (1)

File wml/com/misc/distrib.wml

View file
 <pre class="file_list">
 <b>   Bytes      Timestamp       Filename</b>
 <b>________ ____________________ ____________________________</b>
+[! use File::Basename; !]
 [+
 eval {
 $escmode = 0;
 my $out = "";
+chdir(dirname($ENV{'PATH_TRANSLATED'}));
 $hi = "<get-var PACKAGE_ID>-<get-var VERSION>.tar.gz";
 sub ls {
     my ($pat) = @_;