Subversion Repositories wimsdev

Rev

Rev 11995 | Rev 13573 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 11995 Rev 12515
Line 3... Line 3...
3
 
3
 
4
!! This File creates a set of 1 to 11 links, to put in the head menu of Wims, for anonymous users.
4
!! This File creates a set of 1 to 11 links, to put in the head menu of Wims, for anonymous users.
5
 
5
 
6
!! **********************************************
6
!! **********************************************
7
!if robot isin $session or $wims_mode=popup or _check isin $session or $module=help/main.$lang
7
!if robot isin $session or $wims_mode=popup or _check isin $session or $module=help/main.$lang
8
 !exit
8
  !exit
9
!endif
9
!endif
10
 
10
 
11
!! la variable window=embeded est utilisee dans le cadre d'un appel depuis le lecteur exportable
11
!! la variable window=embeded est utilisee dans le cadre d'un appel depuis le lecteur exportable
12
!! window=embeded is used for embedded players
12
!! window=embeded is used for embedded players
13
!if embededwindow isin $module_init_parm
13
!if embededwindow isin $module_init_parm
14
        !set window=embeded
14
  !set window=embeded
15
!endif
15
!endif
16
!! Don't succeed to use script/language for the moment
16
!! Don't succeed to use script/language for the moment
17
!! translated. FIXME
17
!! translated. FIXME
18
!!!read language name.phtml
18
!!!read language name.phtml
19
!read name.phtml.$lang
19
!read name.phtml.$lang
Line 26... Line 26...
26
  !read themes/$theme_class/lang/$(script_file).$modu_lang
26
  !read themes/$theme_class/lang/$(script_file).$modu_lang
27
!endif
27
!endif
28
 
28
 
29
!default wims_name_bgcolor=$wims_ref_bgcolor
29
!default wims_name_bgcolor=$wims_ref_bgcolor
30
!if $wims_hm!=$empty or $wims_lightpopup=yes
30
!if $wims_hm!=$empty or $wims_lightpopup=yes
31
 !goto defend
31
  !goto defend
32
!endif
32
!endif
33
!if $job=print or $printing=yes
33
!if $job=print or $printing=yes
34
 !goto defend
34
  !goto defend
35
!endif
35
!endif
36
!reset 1_ home_
36
!reset 1_ home_
37
 
37
 
38
!!********* Link #1 : "Close Window" or "Home"
38
!!********* Link #1 : "Close Window" or "Home"
39
 
39
 
40
!if _ isin $wims_subsession
40
!if _ isin $wims_subsession
41
 !set 1_=!append line back,3,window.close() to $1_
41
  !set 1_=!append line back,3,window.close() to $1_
42
!else
42
!else
43
 !if $window != embeded and $module!=home
43
  !if $window != embeded and $module!=home
44
   !set home_=!append line home,1,session=$wims_session.1 to $home_
44
    !set home_=!append line home,1,session=$wims_session.1 to $home_
45
 !endif
45
  !endif
46
!endif
46
!endif
47
 
47
 
48
!!********* Link #2 : "Quit"
48
!!********* Link #2 : "Quit"
49
!if $httpd_HTTP_REFERER!=$empty and $window != embeded
49
!if $httpd_HTTP_REFERER!=$empty and $window != embeded
50
 !set 1_=!append line exit,2,$httpd_HTTP_REFERER to $1_
50
  !set 1_=!append line exit,2,$httpd_HTTP_REFERER to $1_
51
!endif
51
!endif
52
 
52
 
53
!!********* Link #3 : "Work"
53
!!********* Link #3 : "Work"
54
!!if $cmd=intro
54
!!if $cmd=intro
55
!! !set 1_=!append line work,1,module=$module&cmd=new to $1_
55
!! !set 1_=!append line work,1,module=$module&cmd=new to $1_
Line 75... Line 75...
75
!! !set 1_=!append line reference,4,module=$module&cmd=ref&special_parm=$cmd,ref to $1_
75
!! !set 1_=!append line reference,4,module=$module&cmd=ref&special_parm=$cmd,ref to $1_
76
!endif
76
!endif
77
 
77
 
78
!!********* Link #7 : "Help"
78
!!********* Link #7 : "Help"
79
!if $module_has_help=yes and $cmd notwordof intro help
79
!if $module_has_help=yes and $cmd notwordof intro help
80
 !if $module_help=nopop
80
  !if $module_help=nopop
81
   !set 1_=!append line help,1,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
81
    !set 1_=!append line help,1,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
82
 !else
82
  !else
83
   !set 1_=!append line help,4,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
83
    !set 1_=!append line help,4,module=$module&cmd=help&special_parm=$wims_help_parm,mhelp to $1_
84
 !endif
84
  !endif
85
!endif
85
!endif
86
 
86
 
87
!!********* Link #8 : "Resume"
87
!!********* Link #8 : "Resume"
88
!if $cmd=help or $cmd=hint
88
!if $cmd=help or $cmd=hint
89
 !if _test isin $session
89
  !if _test isin $session
90
   !set 1_=!append line resume,1,cmd=resume to $1_
90
    !set 1_=!append line resume,1,cmd=resume to $1_
91
 !else
91
  !else
92
    !if _help isin $session
92
    !if _help isin $session
93
      !set 1_=!append line back2,1,cmd=resume to $1_
93
      !set 1_=!append line back2,1,cmd=resume to $1_
94
    !endif
94
    !endif
95
 !endif
95
  !endif
96
 !if $module_category!=adm
96
  !if $module_category!=adm
97
   !set wims_ariane=!append line resume,1,cmd=resume\
97
    !set wims_ariane=!append line resume,1,cmd=resume\
98
 to $wims_ariane
98
 to $wims_ariane
99
   !set wims_ariane_self=no
99
    !set wims_ariane_self=no
100
 !endif
100
  !endif
101
!endif
101
!endif
102
 
102
 
103
!!********* Link #9 : "About"
103
!!********* Link #9 : "About"
104
!if $window != embeded \
104
!if $window != embeded \
105
        and $module_has_about=yes \
105
          and $module_has_about=yes \
106
        and _tool notin $module and home notin $module \
106
          and _tool notin $module and home notin $module \
107
        and $cmd notwordof help and _exam notin $session\
107
          and $cmd notwordof help and _exam notin $session\
108
        and (adm notin $module or $wims_user iswordof supervisor developper or $wims_user=$empty)
108
          and (adm notin $module or $wims_user iswordof supervisor developper or $wims_user=$empty)
109
                !set 1_=!append line about,4,module=$module&cmd=help&special_parm=about,mhelp,,$wims_name_module_infos ($module) to $1_
109
        !set 1_=!append line about,4,module=$module&cmd=help&special_parm=about,mhelp,,$wims_name_module_infos ($module) to $1_
110
!endif
110
!endif
111
 
111
 
112
!!********* Link #10 : "WIMS Help"
112
!!********* Link #10 : "WIMS Help"
113
!if $module!=home and _exam notin $session and $wims_version_theme=0
113
!if $module!=home and _exam notin $session and $wims_version_theme=0
114
 !set 1_=!append line whelp,4,module=help/main&$wims_helper,help to $1_
114
  !set 1_=!append line whelp,4,module=help/main&$wims_helper,help to $1_
115
!endif
115
!endif
116
 
116
 
117
!!********* Link #11 : "Other Languages"
117
!!********* Link #11 : "Other Languages"
118
!if $wims_ref_otherlangs=yes and $wims_otherlangs!=$empty
118
!if $wims_ref_otherlangs=yes and $wims_otherlangs!=$empty
119
 !if $wims_light_module=yes
119
  !if $wims_light_module=yes
120
  !set wims_name_pagebase=!char 1 to -4 of $phtml
120
    !set wims_name_pagebase=!char 1 to -4 of $phtml
121
  !for i_ in $wims_headmenu_languages
121
    !for i_ in $wims_headmenu_languages
122
   !set 1_=!append line $i_,0,<a href="wims.cgi?session=$session&+lang=$i_&+useropts=$useropts&+module=$module&+phtml=$wims_name_pagebase.$i_&+parm1=$parm1&+parm2=$parm2&+parm3=$parm3&+parm4=$parm4&+parm5=$parm5"><img src="gifs/$i_.gif" border="1" alt="$i_"/></a> to $1_
122
      !set 1_=!append line $i_,0,<a href="wims.cgi?session=$session&+lang=$i_&+useropts=$useropts&+module=$module&+phtml=$wims_name_pagebase.$i_&+parm1=$parm1&+parm2=$parm2&+parm3=$parm3&+parm4=$parm4&+parm5=$parm5"><img src="gifs/$i_.gif" border="1" alt="$i_"/></a> to $1_
123
  !next i_
123
    !next i_
124
 !else
124
  !else
125
  !set wims_name_mbase=!char 1 to -4 of $module
125
    !set wims_name_mbase=!char 1 to -4 of $module
126
  !for i_ in $wims_otherlangs
126
    !for i_ in $wims_otherlangs
127
   !set 1_=!append line $i_,0,<a href="wims.cgi?session=$session&+lang=$i_&+useropts=$useropts&+module=$wims_name_mbase"><img src="gifs/$i_.gif" border=1 alt="$i_" /></a> to $1_
127
      !set 1_=!append line $i_,0,<a href="wims.cgi?session=$session&+lang=$i_&+useropts=$useropts&+module=$wims_name_mbase"><img src="gifs/$i_.gif" border=1 alt="$i_" /></a> to $1_
128
  !next i_
128
    !next i_
129
 !endif
129
  !endif
130
!endif
130
!endif
131
!if $wims_user$wims_developer!=$empty and _ notin $session
131
!if $wims_user$wims_developer!=$empty and _ notin $session
132
  !set wims_link_close=!append line visitor,1,cmd=close&module=home\
132
  !set wims_link_close=!append line visitor,1,cmd=close&module=home\
133
  to $wims_link_close
133
  to $wims_link_close
134
!endif
134
!endif
Line 141... Line 141...
141
!set wims_link_close_cnt=!linecnt $wims_link_close
141
!set wims_link_close_cnt=!linecnt $wims_link_close
142
!read themes.phtml header
142
!read themes.phtml header
143
!if $module=home
143
!if $module=home
144
  <div class="wimstrap">
144
  <div class="wimstrap">
145
!else
145
!else
146
 
-
 
147
  <div class="wimsbody">
146
  <div class="wimsbody">
148
!endif
147
!endif
149
<!-- END of headmenu -->
148
<!-- END of headmenu -->