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 |
|
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 |
|
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 --> |