Subversion Repositories wimsdev

Rev

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

Rev 3587 Rev 3588
Line 47... Line 47...
47 
 !if ../adm/ isin ../$dir or $dir=home or \
 47 
 !if ../adm/ isin ../$dir or $dir=home or \
48 
   (../devel/ isin ../$dir and $wims_devel_modules notwordof open)
 48 
   (../devel/ isin ../$dir and $wims_devel_modules notwordof open)
49 
  error=insert_fail
 49 
  error=insert_fail
50 
  !exit
 50 
  !exit
51 
 !endif
 51 
 !endif
52 
 picksheet=!word 1 of $picksheet
 - 
 
53 
 !if $picksheet=$empty
 52 
 !if $picksheet=$empty
54 
  error=no_pick
 53 
  error=no_pick
55 
  !exit
 54 
  !exit
56 
 !endif
 55 
 !endif
57 
 picksheet=$[floor($picksheet)]
 56 
 picksheet=$[floor($picksheet)]