[Wien] download links in rho.pl/dos.pl/etc

[Peter Blaha]

Thank you very much for the report. I could verify the problem.

To fix the problem it seems to be enough to edit all lines with  "download.pl", like:
                     $OUT .= "<a href=\"/util/download.pl?SID=$SID&file=$_\">$_</a>";
and add $DIR/    before the filename.
                     $OUT .= "<a href=\"/util/download.pl?SID=$SID&file=$DIR/$_\">$_</a>";

Thanks for the report.

Tomohiko Tasaka schrieb:
> Dear w2web maintainer,
> 
> I think that download links in rho.pl/dos.pl/etc don't work well.
> because it can't find the information of their directory.
> could you please check and fix them?
> 
> * here is a sample for updating dos.pl.
> 
> -------------------------------------------------------------------------
> 
> $ diff -urN htdocs.orig htdocs
> diff -urN htdocs.orig/exec/dos.pl htdocs/exec/dos.pl
> --- htdocs.orig/exec/dos.pl     2010-04-13 12:36:00.000000000 +0900
> +++ htdocs/exec/dos.pl  2010-04-13 12:36:41.000000000 +0900
> @@ -11,7 +11,7 @@
> 
> 
>  $next="continue with DOS";
> -$nexturl="/exec/dos.pl?SID=$SID";
> +$nexturl="/exec/dos.pl?SID=$SID&dir=$DIR";
>  $nextinteractive=1;
> 
>  $OUT .= "<h2>Density of states</h2>";
> @@ -364,7 +364,7 @@
>                  $F = $dir . "/" . $_;
>              }
>                  if ($_ =~ /\.dos[1-9].*$/ ) {
> -                    $OUT .= "<a href=\"/util/download.pl?SID=$SID&file=$_\">$_</a>";
> +                    $OUT .= "<a href=\"/util/download.pl?SID=$SID&file=$F\">$_</a>";
>      }}}}
> 
>  $OUT .= <<__STOP__;
> diff -urN htdocs.orig/navig.pl htdocs/navig.pl
> --- htdocs.orig/navig.pl        2010-04-13 12:36:00.000000000 +0900
> +++ htdocs/navig.pl     2010-04-13 12:36:21.000000000 +0900
> @@ -298,7 +298,7 @@
>  $OUT .= <<__STOP__;
>  <A HREF="/navig.pl?SID=$SID&tasks=0"><B>&lt;&lt; Tasks</B></A>
>  $indent<A HREF=/exec/rho.pl?SID=$SID TARGET="main">El. Dens.</A>
> -$indent<A HREF=/exec/dos.pl?SID=$SID TARGET="main">DOS</A>
> +$indent<A HREF=/exec/dos.pl?SID=$SID&dir=$DIR TARGET="main">DOS</A>
>  $indent<A HREF=/exec/xspec.pl?SID=$SID TARGET="main">XSPEC</A>
>  $indent<A HREF=/exec/telnes2.pl?SID=$SID TARGET="main">TELNES.2</A>
>  $indent<A HREF=/exec/optic.pl?SID=$SID TARGET="main">OPTIC</A>
> $
> -------------------------------------------------------------------------
> 
> Thank you for your time and attention.
> 
> With best regards,
> Tomo
> 
> 
> 
> 
> _______________________________________________
> Wien mailing list
> Wien at zeus.theochem.tuwien.ac.at
> http://zeus.theochem.tuwien.ac.at/mailman/listinfo/wien

-- 

                                       P.Blaha
--------------------------------------------------------------------------
Peter BLAHA, Inst.f. Materials Chemistry, TU Vienna, A-1060 Vienna
Phone: +43-1-58801-15671             FAX: +43-1-58801-15698
Email: blaha at theochem.tuwien.ac.at    WWW: http://info.tuwien.ac.at/theochem/
--------------------------------------------------------------------------