Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
13527 obado 1
namechar=-_$alnum
23 reyssat 2
!bound target1 within $zonelist default $
3
!bound target4 within $langlist default $
4
t2=!text select $namechar in $target2
5
t3=!text select $namechar in $target3
6
tlen=!charcnt $target1/$target2/$target3.$target4
4179 obado 7
 
8
!if $t2!=$target2 or $target2=$empty
9
  error=badtarget incorrect_t2
23 reyssat 10
!endif
11
 
4179 obado 12
!if $t3!=$target3 or $target3=$empty
13
  error=$error badtarget incorrect_t3
14
!endif
15
 
16
!if $tlen>40
17
  error=$error badtarget incorrect_tlen
18
!endif
19
 
20
!if $target1=$empty
21
  error=$error badtarget incorrect_t1
22
!endif
23
 
24
!if $target4=$empty
25
  error=$error badtarget incorrect_t4
26
!endif
27
 
28
target=$target1~$target2~$target3.$target4
29
test=!filelist $devdir/$target
30
!if $test!=$empty
31
  error=$error clash
32
!endif