Subversion Repositories wimsdev

Rev

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

  1. !! ce fichier permet d'afficher le source de la feuille
  2. !!!### langage independant
  3.  
  4.  
  5. !if $exocnt<=0
  6.  !let error=srcnoexo
  7.  <div class="wims_msg alert">
  8.  !read lang/msg.phtml.$moduclass_lang
  9.  </div>
  10.  !goto end
  11. !endif
  12.  
  13. <p>$name_getsource</p>
  14. <div class="field box"><textarea class="wims_source" readonly rows="15">
  15. !read wimshome/$wims_sesdir/home_sheet.src
  16. </textarea></div>
  17.  
  18. :end
  19. !let wims_menu_items=!append line sheetadmin,1,cmd=resume to $wims_menu_items
  20.