Subversion Repositories wimsdev

Rev

Rev 4392 | Rev 4631 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4392 Rev 4597
Line 2... Line 2...
2 
!!##parameter 2: words on the link, by default, name of the file
 2 
!!##parameter 2: words on the link, by default, name of the file
3 
 
 3 
 
4 
 !if $parm1=$empty
 4 
 !if $parm1=$empty
5 
  !exit
 5 
  !exit
6 
 !endif
 6 
 !endif
- 
 
 7 
!set parm1=!slashsubst $parm1
7 
!if $parm2=$empty
 8 
!if $parm2=$empty
8 
  !set parm2=$parm1
 9 
  !set parm2=$parm1
- 
 
 10 
!else
- 
 
 11 
  !set parm2=!slashsubst $parm2
9 
!endif
 12 
!endif
10 
 
 13 
 
11 
!set ext_=!replace internal . by , in $parm1
 14 
!set ext_=!replace internal . by , in $parm1
12 
!set ext_=!item -1 of $ext_
 15 
!set ext_=!item -1 of $ext_
13 
!set ext_=!lowercase $ext_
 16 
!set ext_=!lowercase $ext_