Subversion Repositories wimsdev

Rev

Rev 23 | Blame | Last modification | View Log | RSS feed

namechar=-$alnum
!bound target1 within $zonelist default $
!bound target4 within $langlist default $
t2=!text select $namechar in $target2
t3=!text select $namechar in $target3
tlen=!charcnt $target1/$target2/$target3.$target4
!if $t2!=$target2 or $t3!=$target3 or $tlen>40 or \
   $target1=$empty or $target2=$empty or $target3=$empty or $target4=$empty
 error=badtarget
!else
 target=$target1~$target2~$target3.$target4
 test=!filelist $devdir/$target
 !if $test!=$empty
  error=clash
 !endif
!endif