Subversion Repositories wimsdev

Rev

Rev 14938 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
!distribute item $wims_read_parm into n_,t_,l_,a_
4386 bpr 2
!if $t_ notwordof exercise doc href
14043 bpr 3
  !exit
23 reyssat 4
!endif
4386 bpr 5
 
6
!if href iswordof $t_
14942 guerimand 7
!!  !default a_=$l_
8
!!  !set n_=!replace internal . by , in $l_
9
!!  !set n_=!item -1 of $n_
10
!!  !set n_=!lowercase $n_
11
!!  !if $n_ notwordof jpeg jpg png gif pdf tex txt mp3 flv avi ggb ods
12
!!    !set n_=cgi
13
!!  !endif
14
!!  !set n_=!replace internal cgi? by $n_? in $m_filedir
14938 guerimand 15
!!  <a target="wims_internal" href="$n_/$l_" >$a_</a>
16
  <a target="wims_internal" href="$m_filedir/$l_" download="$l_">$a_</a>
14043 bpr 17
  !exit
4386 bpr 18
!endif
19
 
20
!href session=$wims_session&$l_ $a_