Subversion Repositories wimsdev

Rev

Rev 11174 | Rev 11441 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
23 reyssat 1
!read scripts/getindex $modreq
2
!if $title=$empty and $inddef=$empty
3
 job=modname
4
 modreq=
5
 !changeto $job.proc
6
!endif
7
 
6222 bpr 8
dir=binary,data,images,help,anstype,slib
23 reyssat 9
cattest=!module category devel/$auth_login/$mod
10
!if document isin $cattest
7239 bpr 11
  dir=doc/srctex
7285 bpr 12
  test=!defof common_files in wimshome/public_html/$devdir/$mod/var.proc
7236 bpr 13
!!!FIXME depends on 1
14
  !if $test!=yes
7239 bpr 15
    dir=!append item doc/1/files to $dir
7236 bpr 16
  !else
7239 bpr 17
    dir=!append item doc/files to $dir
7236 bpr 18
  !endif
23 reyssat 19
!endif
20
!if oef isin $cattest
21
 test=!defof common_images in wimshome/public_html/$devdir/$mod/var.proc
22
 !if $test!=yes and datamodule/ notin $test
23
  oefs=!sh cd $devdir/$mod/src\
24
   ls *.oef | grep -v '\*' | sed 's/\.oef$$//' | awk '{print "images/"$$1}'
25
  oefs=!lines2items $oefs
26
  dir=$dir,$oefs
27
 !endif
28
!endif
29
 
30
!bound bin_dir within $dir default $
31
 
32
!if $bin_job=erase and $fname!=$empty
33
 check=!translate internal / to , in $fname
34
 check=!item 1 to -2 of $check
35
 check=!nospace $check
36
 check=!translate internal , to / in $check
37
 !if $check!=$empty and $check isitemof $dir and .. notin $fname
38
  src=cd $devdir/$mod; rm -f $fname
39
  !if ../images/ isin ../$check/
40
   src=$src\
41
    exec imgindex
42
  !endif
43
  !sh $src
44
 !endif
11191 bpr 45
 successdelete=yes
23 reyssat 46
!endif
10237 bpr 47
success=no
23 reyssat 48
!if $wims_deposit!=$empty and $wims_deposit!=noname.file \
49
	and $bin_job=deposit and $bin_dir!=$empty \
11174 bpr 50
	and / notin $wims_deposit and .. notin $wims_deposit and & notin $wims_deposit
51
   wims_deposit=!nospace $wims_deposit
52
   wims_deposit=!deaccent $wims_deposit
53
   src=mkdir $devdir/$mod/$bin_dir\
23 reyssat 54
   mv $wims_home/$wims_sesdir/user-deposit $devdir/$mod/$bin_dir/$wims_deposit
11174 bpr 55
   !if ../images/ isin ../$bin_dir/
56
    src=$src\
57
     cd $devdir/$mod\
58
     exec imgindex
59
   !endif
60
   !sh $src
61
   success=yes
23 reyssat 62
!endif
63
 
64
dirs=!items2words $dir
65
bfiles=!sh cd $devdir/$mod\
10235 bpr 66
	dd=`find $dirs -type f -name '*'| sort | uniq 2>/dev/null`\
23 reyssat 67
	[ -z "$$dd" ] && exit\
68
	ls -l $$dd | awk '{print $$9","$$5}'
69
 
70
bcnt=!linecnt $bfiles
9932 bpr 71
 
72
dest_=$wims_home/public_html/$devdir/$mod
73
 
10235 bpr 74
!if $mkdoc !=$empty
9932 bpr 75
  !sh cd $dest_ ; $wims_home/other/bin/src2def ;
76
!endif
77
 
78
!reset mkdoc