Subversion Repositories wimsdev

Rev

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

  1.  
  2. !read adm/css.phtml
  3. !if $(module_title_$modu_lang)!=
  4.   !set module_title=$(module_title_$modu_lang)
  5. !endif
  6. !read lang/names.phtml.$modu_lang
  7. !if $job iswordof edfile showfile diff restore
  8.   !set typetest=!module category devel/$auth_login/$mod
  9.   !if doc notitemof $typetest
  10.     !if .oef_ isin $(fname)_ or .cpp_ isin $(fname)_
  11.       !set edit_area_syntax=wimsoef
  12.     !else
  13.       !if .phtml_ isin $(fname)_ or .proc_ isin $(fname)_
  14.         !set edit_area_syntax=wims
  15.       !else
  16.         !set edit_area_syntax=wimsdata
  17.       !endif
  18.     !endif
  19.   !endif
  20.   !if $job iswordof diff or ($job=restore and $confirm=diffcheck)
  21.      !set edit_area_syntax=diff
  22.   !endif
  23.   !if $job=edfile
  24.     !read js/edit_area.phtml wims_deposit $edit_area_syntax
  25.   !else
  26.     !read js/edit_area.phtml wims_show $edit_area_syntax
  27.   !endif
  28. !endif
  29. !header
  30.  
  31. !if $error!=$empty
  32.   <div class="wims_msg alert">
  33.   !read lang/msg.phtml.$modu_lang
  34.   </div>
  35. !endif
  36. !read $job.phtml
  37.  
  38. !if $auth_login!=$empty and $job notwordof modname copy
  39.   !if $wims_theme=default
  40. !!ARIANE
  41.     !set wims_menu_items=!append line itemsep,0,$wims_name_navigation\
  42. modlist,1,cmd=reply&jobreq=modname\
  43. to $wims_menu_items
  44.   !else
  45.     !set wims_menu_items=!append line itemsep,0,$wims_name_navigation\
  46. to $wims_menu_items
  47.   !endif
  48.   !if $job iswordof index publish diff edfile showfile
  49.     !set wims_menu_items=!append line binfile,1,cmd=reply&jobreq=binfile\
  50.     modcontent,1,cmd=reply&jobreq=flist\
  51. to $wims_menu_items
  52.   !endif
  53.   !if $job iswordof flist and $modreq!=.new
  54.     !set wims_menu_items=!append line binfile,1,cmd=reply&jobreq=binfile\
  55. to $wims_menu_items
  56.   !endif
  57.   !if $job iswordof binfile
  58.     !set wims_menu_items=!append line otherfiles,1,cmd=reply&jobreq=flist\
  59.      to $wims_menu_items
  60.   !endif
  61.   !if $job iswordof flist edfile showfile binfile
  62.     !if .oef isin $fname
  63.       !set tmp_f=!replace internal src/ by in $fname
  64.       !if $wims_class!=$empty
  65.         !let para=!defof user_qnum\
  66. user_scoredelay\
  67. user_seedrepeat\
  68. user_qcmlevel in wimshome/log/classes/$wims_class/supervisor
  69.         !distribute line $para into para1,para2,para3,para4
  70.       !endif
  71.       !default para1=1
  72.       !default para2=0
  73.       !default para3=0
  74.       !default para4=1
  75.       !set tmp_f=!replace internal .oef by in &exo=$tmp_f&qnum=$para1&scoredelay=$para2&seedrepeat=$para3&qcmlevel=$para4&cmd=new
  76.     !else
  77.       !set tmp_f=&cmd=intro
  78.     !endif
  79.     !if $job notwordof publish prop diff
  80.      !set wims_menu_items=!append line itemsep,0, $wims_name_action\
  81. test,4,module=devel/$auth_login/$mod$tmp_f,test\
  82.  to $wims_menu_items
  83.     !endif
  84.     !set doctest=!module category devel/$auth_login/$mod
  85.     !if document isin $doctest
  86.       !set doclist=!defof doclist in wimshome/public_html/$devdir/$mod/var.proc
  87.       !set doclist=!words2items $doclist
  88.       !set test=!itemcnt $doclist
  89.       !if $test<=1
  90.         !set wims_menu_items=!append line docgestion,1,module=adm/doc&devdoc=$mod&doc=1&job=read\
  91.       to $wims_menu_items
  92.       !else
  93.         !for d_=1 to $test
  94.         !set wims_menu_items=!append line docgestion ($(doclist[$d_])),1,module=adm/doc&devdoc=$mod&doc=$(doclist[$d_])&job=read\
  95.      to $wims_menu_items
  96.         !next
  97.       !endif
  98.     !endif
  99.     !set wims_menu_items=!append line modsave,1,cmd=reply&jobreq=backup\
  100.   to $wims_menu_items
  101.     !if $job=showfile
  102.       !set wims_menu_items=!append line edfile,1,cmd=reply&jobreq=edfile\
  103. to $wims_menu_items
  104.     !endif
  105.     !if $job=edfile
  106.       !if $wims_theme=default
  107. !!ARIANE
  108.         !set wims_menu_items=!append line back3,1,cmd=reply&jobreq=flist\
  109. to $wims_menu_items
  110.       !endif
  111.     !endif
  112.   !endif
  113. !endif
  114. !if $job iswordof flist index showfile edfile
  115.     !if $wims_menu_items!=
  116.       !set wims_menu_items=!append line itemsep,0,$wims_name_docu\
  117. to $wims_menu_items
  118.     !endif
  119.     !set wims_menu_items=!append line docoef,4,module=adm/createxo&modtoolhelp=yes,help\
  120. docslib,4, module=help/wimsdoc&subject=slib#slib,help\
  121.   docanswer,4,module=adm/createxo&modtoolhelp=yes&special_parm=reply,help\
  122.    doctec,4,module=help/wimsdoc.en,help\
  123.   to $wims_menu_items
  124.   !if $job iswordof edfile
  125.      !set wims_menu_items=!append line Keywords,4,session=$(wims_session)_mhelp&cmd=help&special_parm=keywords,help\
  126.   to $wims_menu_items
  127.   !endif
  128. !endif
  129.  
  130. !if $job iswordof flist index publish diff binfile
  131.   !set wims_menu_items=!append line itemsep,0,$name_publication\
  132. to $wims_menu_items
  133.   !if $job iswordof flist publish diff binfile
  134.     !set wims_menu_items=!append line properties,1,cmd=reply&jobreq=index\
  135.   to $wims_menu_items
  136.     !if $pubtit!=$empty
  137.       !set wims_menu_items=!append line checkdiff,1,cmd=reply&jobreq=diff\
  138.   ,01,local: $version / pub: $pubversion\
  139.     to $wims_menu_items
  140.     !endif
  141.   !endif
  142.   !if $job notwordof publish
  143.     !set wims_menu_items=!append line publish,1,cmd=reply&jobreq=publish\
  144. to $wims_menu_items
  145.   !endif
  146. !endif
  147.  
  148. !tail
  149.  
  150. !reset confirm target1 target2 target3 target4 vcheat \
  151.       i_translator i_translator_address, modifiers \
  152.       p_name p_email p_pass1 p_pass2 bin_job
  153.