Subversion Repositories wimsdev

Rev

Rev 15421 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 15421 Rev 16231
Line 53... Line 53...
53 
  !changeto $job.proc
 53 
  !changeto $job.proc
54 
!endif
 54 
!endif
55 
 
 55 
 
56 
fstat=!sh stat -c "%s,%y,%A" $wims_home/$file
 56 
fstat=!sh stat -c "%s,%y,%A" $wims_home/$file
57 
!distribute item $fstat into flen,fdat,facc
 57 
!distribute item $fstat into flen,fdat,facc
- 
 
 58 
fsec=!word 2 of $fdat
- 
 
 59 
fsec=!replace \..* by in $fsec
58 
fdat=!word 1 of $fdat
 60 
fdat=!word 1 of $fdat
59 
 
 61 
 
60 
!if $modifok=yes and $job2=erase
 62 
!if $modifok=yes and $job2=erase
61 
  job2=
 63 
  job2=
62 
  erase=ask
 64 
  erase=ask