| 5,6 → 5,19 |
|---|
| into\ |
| m_firstname,m_lastname,m_newmsgcnt |
| |
| !! --- in case of use of file of the document in the presentation page |
| !if $class_homepage!=yes |
| !let m_filedir=$wims_ref_name?session=$wims_session&+cmd=getfile&+special_parm=doc |
| !let tmp=!replace internal / by , in $class_homepage |
| !sh if [ -d $wims_home/log/classes/$wims_class/doc/$(tmp[1])/files ]; then\ |
| cd $wims_home/$wims_sesdir;\ |
| mkdir -p getfile;\ |
| cd getfile;\ |
| rm -f doc;\ |
| ln -s $wims_home/log/classes/$wims_class/doc/$(tmp[1])/files doc;\ |
| fi |
| !endif |
| |
| !set m_today=!char 1 to 8 of $wims_now |
| !set m_sheets=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheets |
| !set m_exams=!recordcnt wimshome/log/classes/$wims_class/exams/.exams |
| 18,7 → 31,7 |
|---|
| !for i=1 to $m_sheets |
| !set l_=!record $i of wimshome/log/classes/$wims_class/sheets/.sheets |
| !distribute lines $l_ into m_status$i,m_expiration$i,m_title$i,m_desc$i |
| !next i |
| !next i |
| !for i=1 to $m_exams |
| !set l_=!record $i of wimshome/log/classes/$wims_class/exams/.exams |
| !distribute lines $l_ into m_statusE$i,m_expirationE$i,m_titleE$i,m_descE$i |