Subversion Repositories wimsdev

Rev

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

Rev Author Line No. Line
23 reyssat 1
!bound format within zip,tgz,tar.gz default zip
2
 
3
sel=!listintersect $selection and $reclist
4
!default sel=$reclist
12502 guerimand 5
!! deleted : don't need to uncheck score and forum by default
6
!! select=!listcomplement score,forum in $sel
23 reyssat 7
selw=!items2words $sel
8
dictionary=$module_dir/arch/recdep
9
dep=!exec translator $selw
12502 guerimand 10
!! -- generate list of data (with dependancy) really in the backup (not just the selected)
11
select=$selw $dep
12
select=!words2items $select
13
select=!listuniq $select
14
!! --
23 reyssat 15
dictionary=$module_dir/arch/recdir
16
dirs=!exec translator $selw $dep
17
dirs=!words2items $dirs
18
dirs=!listuniq $dirs
19
dirs=!items2words $dirs
20
 
12502 guerimand 21
 
2477 bpr 22
dictionary=$module_dir/lang/recnames.$moduclass_lang
23 reyssat 23
tot=!replace , by , $ in $reclist
24
tot=!exec translator $tot
25
fname=!translate internal / to ~ in $wims_class
3974 guerimand 26
!if $class_typename=course
12413 bpr 27
  tmpnum_class=!char 1 to -5 of $wims_class
3974 guerimand 28
!else
12413 bpr 29
  tmpnum_class=$wims_class
3974 guerimand 30
!endif
23 reyssat 31
fsize=!mexec arch/pack.sh
4599 bpr 32
wims_class_log=Backup created by $wims_realuser
23 reyssat 33
!if $fsize!=$empty
12413 bpr 34
  fsize=$[ceil($fsize/1024)]
35
  !setdef !set class_backup=$today in wimshome/log/classes/$wims_class/.def
23 reyssat 36
!endif