Subversion Repositories wimsdev

Rev

Rev 13524 | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. #! /bin/sh
  2.  
  3. outdir=$w_wims_home/log/classes/$w_wims_class/sheets
  4. if [ ! -d $outdir ]; then exit; fi
  5. cd $outdir
  6.  
  7. n=$(($w_sheet+1))
  8. rm -f .sheet$w_sheet sheet$w_sheet.src sheet$w_sheet.def >/dev/null
  9. while [ $n -le $w_scnt ]; do
  10.  mv .sheet$n .sheet$(($n-1)) >/dev/null
  11.  mv sheet$n.src sheet$(($n-1)).src >/dev/null
  12.  mv sheet$n.def sheet$(($n-1)).def >/dev/null
  13.  
  14.  n=$(($n+1))
  15. done
  16.