Subversion Repositories wimsdev

Rev

Rev 13771 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !!##parameter 1: name of the file with extension
  2. !!##parameter 2: words on the link, by default, name of the file
  3.  
  4. !if $parm1=$empty
  5.   !exit
  6. !endif
  7. !set parm1=!slashsubst $parm1
  8. !if $parm2=$empty
  9.   !set parm2=$parm1
  10. !else
  11.   !set parm2=!slashsubst $parm2
  12. !endif
  13.  
  14. !set ext_=!replace internal . by , in $parm1
  15. !set ext_=!item -1 of $ext_
  16. !set ext_=!lowercase $ext_
  17. !if $ext_ notwordof jpeg jpg png gif pdf tex txt mp3 flv avi ggb ods rtf tgz zip
  18.   !set ext_=cgi
  19. !endif
  20. !set ext_=cgi
  21. !if $module_category=adm
  22.   <a target="wims_external" href="wims.$ext_?session=$wims_session&cmd=getfile&special_parm=doc/$parm1" download="$parm1">$parm2</a>
  23. !else
  24.   <a target="wims_external" href="$m_filedir/$parm1" download="$parm1">$parm2</a>
  25. !endif
  26.