Subversion Repositories wimsdev

!if $job2=deposit and $wims_deposit!=$empty \

	and / notin $wims_deposit and .. notin $wims_deposit

 !sh mkdir -p $wims_home/$Docdir/$doc/files\

  mv $wims_home/$wims_sesdir/user-deposit $wims_home/$Docdir/$doc/files/$wims_deposit\

  cd $wims_home/$wims_sesdir\

  mkdir -p getfile\

  cd getfile\

  rm -f doc\

  ln -s $wims_home/$filelink/files doc

 !read quota.proc

 !if $quota_free<0

  !sh rm -f $wims_home/$Docdir/$doc/files/$wims_deposit

  error=quota_file

 !endif

!endif

!if erase isin $job2 and .. notin $job2

 erase=!item 2 of $job2

 !sh rm -f $wims_home/$Docdir/$doc/files/$erase

!endif

flist=!filelist $wims_home/$Docdir/$doc/files

flist=!words2items $flist

f1=$wims_deposit

!if $f1 notin $flist or $f1=

  f1=!item 1 of $flist

!endif

!read quota.proc