Rev 11086 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 11086 | Rev 13455 | ||
---|---|---|---|
Line 62... | Line 62... | ||
62 | cd $wims_home/log/classes/\ |
62 | cd $wims_home/log/classes/\ |
63 | if [ ! `ls -d $class | wc -c` -eq 0 ] ; then echo "class already existing; nothing is done" ; exit ; fi ;\ |
63 | if [ ! `ls -d $class | wc -c` -eq 0 ] ; then echo "class already existing; nothing is done" ; exit ; fi ;\ |
64 | tar xzf $class.tgz\ |
64 | tar xzf $class.tgz\ |
65 | perl -np -i -e "s:class_expiration=.*:class_expiration=$date:g" $class/.def\ |
65 | perl -np -i -e "s:class_expiration=.*:class_expiration=$date:g" $class/.def\ |
66 | rm $class.tgz\ |
66 | rm $class.tgz\ |
67 | cd $wims_home; mkdir -p |
67 | cd $wims_home; mkdir -p backuprestore; mv backup/oldclasses/$year/$class.tgz backuprestore |
68 | !if $test!=$empty |
68 | !if $test!=$empty |
69 | error=$test |
69 | error=$test |
70 | !reset test stepcl |
70 | !reset test stepcl |
71 | !sh cd $wims_home/log/classes/ ; rm -f $class.tgz |
71 | !sh cd $wims_home/log/classes/ ; rm -f $class.tgz |
72 | !exit |
72 | !exit |