Subversion Repositories wimsdev

Rev

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

Rev 2389 Rev 4875
Line 2... Line 2...
2 
!readdef wimshome/public_html/modules/$devdir/$mod/INDEX
 2 
!readdef wimshome/public_html/modules/$devdir/$mod/INDEX
3 
pubmod=!translate internal ~ to / in $mod
 3 
pubmod=!translate internal ~ to / in $mod
4 
m1=!translate internal ~ to , in $mod
 4 
m1=!translate internal ~ to , in $mod
5 
m1=!item 1 of $m1
 5 
m1=!item 1 of $m1
6 
pubtest=!module title $pubmod
 6 
pubtest=!module title $pubmod
7 
diff=!sh cd modules\
 - 
 
8 
 diff -r --new-file $pubmod devel/$auth_login/$mod | sed 's/\&/\&amp;/g;s/</\&lt;/g;s/\$$/\&#36;/g' | tail -c 15000
 - 
 
9 
diffcnt=!charcnt $diff
 - 
 
10 
!if $diffcnt>14500
 - 
 
11 
 diff=MANY
 - 
 
12 
!endif
 - 
 
13 
 
 7 
 
14 
!if $pubtest=$empty or $m1 notitemof $zonelist or \
 8 
!if $pubtest=$empty or $m1 notitemof $zonelist or \
15 
  $m1=test
 9 
  $m1=test
16 
 job=flist
 10 
 job=flist
17 
 !changeto $job.proc
 11 
 !changeto $job.proc
18 
!endif
 12 
!endif
- 
 
 13 
 
- 
 
 14 
category=!module category $pubmod
- 
 
 15 
 
- 
 
 16 
!if oef isitemof $category
- 
 
 17 
  exclude=--exclude def
- 
 
 18 
!endif
- 
 
 19 
!if document isitemof $category
- 
 
 20 
  exclude=--exclude '*.def'
- 
 
 21 
!endif
- 
 
 22 
diff=!sh cd modules\
- 
 
 23 
 diff -r $exclude --new-file  $pubmod devel/$auth_login/$mod | sed 's/\&/\&amp;/g;s/</\&lt;/g;s/\$$/\&#36;/g' | tail -c 20000
- 
 
 24 
 
- 
 
 25 
diffcnt=!charcnt $diff
19 
 
 26 
 
- 
 
 27 
!if $diffcnt>19500
- 
 
 28 
 diff1=MANY
- 
 
 29 
 diff =!char 1 to 19000 of $diff
- 
 
 30 
!else
- 
 
 31 
  diff = !replace internal diff -r $exclude --new-file by in $diff
- 
 
 32 
  !if $diff !=$empty
- 
 
 33 
    diff=diff -r $exclude --new-file\
- 
 
 34 
$diff
- 
 
 35 
  !endif
- 
 
 36 
!endif