Subversion Repositories wimsdev

Rev

Rev 10878 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 10878 Rev 12477
Line 25... Line 25...
25 
Tot_dom=!lookup domain in $dir
 25 
Tot_dom=!lookup domain in $dir
26 
Tot_dom=!sort items $Tot_dom
 26 
Tot_dom=!sort items $Tot_dom
27 
!for d in $Tot_dom
 27 
!for d in $Tot_dom
28 
  tot_dom_$d=!lookup $d in $dir
 28 
  tot_dom_$d=!lookup $d in $dir
29 
  !for l in  $(tot_dom_$d)
 29 
  !for l in  $(tot_dom_$d)
30 
     dom_$l=!lookup $l in $dir
 30 
    dom_$l=!lookup $l in $dir
31 
  !next
 31 
  !next
32 
!next
 32 
!next
33 
!reset list_taxonomy
 33 
!reset list_taxonomy
34 
 
 34 
 
35 
!for taxo in $list_taxo
 35 
!for taxo in $list_taxo
36 
  !if .$(lang)__ isin $(taxo)__
 36 
  !if .$(lang)__ isin $(taxo)__
37 
   !set lang_exists=!defof lang_exists in taxoext/$taxo
 37 
    !set lang_exists=!defof lang_exists in taxoext/$taxo
38 
   !if $lang_exists=yes
 38 
    !if $lang_exists=yes
39 
     !set script_taxo=yes
 39 
      !set script_taxo=yes
40 
     !set list_taxonomy=!append item taxoext/$taxo to $list_taxonomy
 40 
      !set list_taxonomy=!append item taxoext/$taxo to $list_taxonomy
41 
   !endif
 41 
    !endif
42 
  !endif
 42 
  !endif
43 
!next
 43 
!next
44 
!! take the english version
 44 
!! take the english version
45 
!for taxo in $list_taxo
 45 
!for taxo in $list_taxo
46 
   !set tmp=!replace internal . by , in $(taxo)
 46 
  !set tmp=!replace internal . by , in $(taxo)
47 
   !if $(tmp[1]) notin $list_taxonomy
 47 
  !if $(tmp[1]) notin $list_taxonomy
48 
     !set script_taxo=yes
 48 
    !set script_taxo=yes
49 
     !set list_taxonomy=!append item taxoext/$(tmp[1]).phtml.en to $list_taxonomy
 49 
    !set list_taxonomy=!append item taxoext/$(tmp[1]).phtml.en to $list_taxonomy
50 
   !endif
 50 
  !endif
51 
!next
 51 
!next
52 
 
 52 
 
53 
!set lang_exists=!defof lang_exists in keywords.phtml.$lang
 53 
!set lang_exists=!defof lang_exists in keywords.phtml.$lang
54 
  !if $lang_exists=yes
 54 
!if $lang_exists=yes
55 
    !set script_keywords=yes
 55 
  !set script_keywords=yes
56 
  !endif
 56 
!endif
57 
 
 57 
 
58 
!read $job.proc
 58 
!read $job.proc
59 
!set wims_ariane_self=no
 59 
!set wims_ariane_self=no
60 
!if $job=home
 60 
!if $job=home
61 
  !set wims_ariane=!append line browse,8\
 61 
  !set wims_ariane=!append line browse,8\
Line 68... Line 68...
68 
!if $job=subject
 68 
!if $job=subject
69 
  !set parm_father=!lookup $parm in $treefile
 69 
  !set parm_father=!lookup $parm in $treefile
70 
  !if $parm_father!=$empty
 70 
  !if $parm_father!=$empty
71 
    !set wims_ariane=!append line back2 $parm_father,1,module=$module&cmd=new&job=subject&parm=$parm_father\
 71 
    !set wims_ariane=!append line back2 $parm_father,1,module=$module&cmd=new&job=subject&parm=$parm_father\
72 
to $wims_ariane
 72 
to $wims_ariane
73 
  !else
 73 
  !else
74 
    !set wims_ariane=!append line "$(name_by_$job)",8 to $wims_ariane
 74 
    !set wims_ariane=!append line "$(name_by_$job)",8 to $wims_ariane
75 
  !endif
 75 
  !endif
76 
!else
 76 
!else
77 
  !if $job isitemof subject,taxo,level,type
 77 
  !if $job isitemof subject,taxo,level,type
78 
    !set wims_ariane=!append line "$(name_by_$job)",8 to $wims_ariane
 78 
    !set wims_ariane=!append line "$(name_by_$job)",8 to $wims_ariane
Line 80... Line 80...
80 
    !set wims_ariane=!append line "$(name_$job)",8 to $wims_ariane
 80 
    !set wims_ariane=!append line "$(name_$job)",8 to $wims_ariane
81 
  !endif
 81 
  !endif
82 
!endif
 82 
!endif
83 
 
 83 
 
84 
!if $job!=home
 84 
!if $job!=home
85 
 wims_module_log=$job $parm
 85 
  wims_module_log=$job $parm
86 
!endif
 86 
!endif
87 
 
 - 
 
88 
 
 -