Subversion Repositories wimsdev

Rev

Rev 5350 | Rev 5828 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. !read adm/language lang/names.phtml
  2. !!read lang/names.phtml.$modu_lang     --------- not used, file directly read by script adm/language
  3.  
  4. !if robot isin $session or _ isin $session
  5.  !exit
  6. !endif
  7.  
  8. !if $error isitemof bad_password,bad_loginmail
  9.   !read js/chrono.phtml 5
  10. !endif
  11. !set wims_html_header=$wims_html_header $header_js
  12.  
  13. !read adm/css.phtml
  14. !if $(module_title_$modu_lang)!=
  15.   !set module_title=$(module_title_$modu_lang)
  16. !endif
  17. !read adm/class/classname.phtml $class_description\
  18. $class_institution
  19.  
  20. !header
  21.  
  22. !read adm/title.phtml 3\
  23. \
  24. --- $(wims_name_n_$type) ---
  25.  
  26. !if $error!=$empty
  27.  !read lang/msg.phtml.$moduclass_lang
  28. !! why not having a !goto end here??
  29. !! (the "!exit" in lang/msg.phtml.$moduclass_lang seems not to be stopping
  30. !! the rest of the page from being shown)
  31. !! !goto end
  32.  <p><hr> <p>
  33. !endif
  34.  
  35.  
  36. !!! En fait cela devrait ĂȘtre $idp_method=$empty Comment arrive-t-on ici ?
  37. !if OK iswordof $auth_test and $auth_method isitemof $auth_method_list and $exist_check notsametext yes
  38. !! we get here e.g. in case class_authidp=cas;php
  39. $name_new_participant_external
  40.  
  41.  !if $type_class > 0 and $type!=authsupervisor
  42.   !set tmp_=&subclass=yes
  43.  !endif
  44.  <center>
  45. !! this is probably the only place we need idp_method=php
  46. !! (e.g. if class_authidp=cas;php)
  47.  !if $(class_authidp[2;]) iswordof php and $class_php_auth!=$empty
  48.  !if $type=authsupervisor
  49.   !set ttmp_=&authtype=teacher
  50.  !endif
  51.    <a href="$class_php_auth?enter=$class$ttmp_" class="wims_button">$name_register</a>        
  52.  !else
  53.    !set wims_ref_class=wims_button
  54.    !href module=adm/class/reguser&class=$class$tmp_ $name_register
  55.  !endif
  56.  </center>
  57.  !goto end
  58. !endif
  59.  
  60. !read $type.phtml
  61. !if $wims_user=$empty or $wims_user=supervisor or $wims_class=$superclass
  62.  !for t in participant,supervisor,example
  63.   !if $t!=$type or $superclass!=$empty
  64.    !set wims_menu_items=!append line n_$t,1,module=$module&type=$t&keyword=$keyword\
  65. to $wims_menu_items
  66.   !! !href module=$module&type=$t&keyword=$keyword $(wims_name_n_$t)
  67.   !endif
  68.  !next t
  69. !endif
  70. !if $wims_user=$empty and $type iswordof supervisor example
  71.  !set wims_menu_items=!append line ,0,\
  72.  classcreate,1,module=adm/class/regclass\
  73. to $wims_menu_items
  74. !endif
  75.  
  76.  !if $wims_theme_version=0 or $wims_theme_version=
  77.  <center>
  78.   !href target=wims_help module=help/main&chapter=3 $wims_name_Explanations
  79.  </center>
  80.  !endif
  81. !endif
  82. :end
  83. !tail
  84.  
  85. !reset auth_user,auth_password,superclass,keyword
  86.  
  87.