Subversion Repositories wimsdev

!read scripts/getindex $modreq
!if $title=$empty and $inddef=$empty
 job=modname
 modreq=
 !changeto $job.proc
!endif

dir=binary,data,images,help,anstype,slib
cattest=!module category devel/$auth_login/$mod
!if document isin $cattest
  dir=doc/srctex
  test=!defof common_files in wimshome/public_html/$devdir/$mod/var.proc
!!!FIXME depends on 1
  !if $test!=yes
    dir=!append item doc/1/files to $dir
  !else
    dir=!append item doc/files to $dir
  !endif
!endif
!if oef isin $cattest
 test=!defof common_images in wimshome/public_html/$devdir/$mod/var.proc
 !if $test!=yes and datamodule/ notin $test
  oefs=!sh cd $devdir/$mod/src\
   ls *.oef | grep -v '\*' | sed 's/\.oef$$//' | awk '{print "images/"$$1}'
  oefs=!lines2items $oefs
  dir=$dir,$oefs
 !endif
!endif

!bound bin_dir within $dir default $

!if $bin_job=erase and $fname!=$empty
 check=!translate internal / to , in $fname
 check=!item 1 to -2 of $check
 check=!nospace $check
 check=!translate internal , to / in $check
 !if $check!=$empty and $check isitemof $dir and .. notin $fname
  src=cd $devdir/$mod; rm -f $fname
  !if ../images/ isin ../$check/
   src=$src\
    exec imgindex
  !endif
  !sh $src
  successdelete=yes
 !else
  successdelete=no
 !endif
!endif

success=no
!if $wims_deposit!=$empty and $wims_deposit!=noname.file \
        and $bin_job=deposit and $bin_dir!=$empty \
        and / notin $wims_deposit and .. notin $wims_deposit and & notin $wims_deposit
   wims_deposit=!nospace $wims_deposit
   wims_deposit=!deaccent $wims_deposit
   src=mkdir $devdir/$mod/$bin_dir\
   mv $wims_home/$wims_sesdir/user-deposit $devdir/$mod/$bin_dir/$wims_deposit
   !if ../images/ isin ../$bin_dir/
    src=$src\
     cd $devdir/$mod\
     exec imgindex
   !endif
   !sh $src
   success=yes
!endif

dirs=!items2words $dir
bfiles=!sh cd $devdir/$mod\
        dd=`find $dirs -type f -name '*'| sort | uniq 2>/dev/null`\
        [ -z "$$dd" ] && exit\
        ls -l $$dd | awk '{print $$9","$$5}'

bcnt=!linecnt $bfiles

dest_=$wims_home/public_html/$devdir/$mod

!if $mkdoc !=$empty
  !sh cd $dest_ ; $wims_home/other/bin/src2def ;
!endif

!reset mkdoc