source: trunk/cgi-bin/cross_menu @ 1

Last change on this file since 1 was 1, checked in by cbipsl, 18 years ago

Geisa inital import

File size: 1.7 KB
Line 
1#file=cross_menu
2#on entry: $cross $base $lang
3tab()
4{ set - `expr $1 - length $opt`;s=;while set - `expr $1 - 1`;[ $1 -ge 0 ];do s=$s" ";done;echo $s;}
5if [ ${base:=new} = new ];then basc=old;else basc=new;fi
6if [ ${lang:=fr} = fr ];then lanc=en;else lanc=fr;fi
7echo "<table border width=100% cols=3><tr valign=top><td width=20%>"
8echo "<a name=\"first\"></a>"
9echo "<h1>Options</h1>"
10echo "<li><a href=\"cross_ext?$base+$lang\">ext</a>"
11echo "</td><td width=25%>"
12echo "<h1>Documents</h1>"
13echo "<li><a href=\"/etherTypo/?id=1161\" class=\"clien\">"
14 echoln "doc compl&egrave;te" "full description"
15 echo "</a><ul>"
16echo "<li><a href=\"/etherTypo/?id=1163\" class=\"clien\">"
17 echoln "donn&eacute;es" "data files"
18 echo "</a>"
19echo "<li><a href=\"/etherTypo/?id=1162\#cross\" class=\"clien\">"
20 echoln "logiciel" "basic software"
21 echo "</a></ul>"
22echo "</td><td>"
23echol "<h1>Environnement</h1>" "<h1>Environment</h1>"
24echo "<li><em>Base:</em> $crossbl"
25 echo "<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <img src=/etherTypo/fileadmin/files/GEISA/arrow.gif89 align=absmiddle> <a href=\"geisa_start?$base+$lang\">$geisabl</a>"
26 echo "<br>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <img src=/etherTypo/fileadmin/files/GEISA/arrow.gif89 align=absmiddle> <a href=\"geisa_start?$basc+$lang\">$geisabcl</a>"
27echo "<li><em>"
28 echol "Langue" "Language"
29 echo ":</em>&nbsp; $geisal <img src=/etherTypo/fileadmin/files/GEISA/arrow.gif89 align=absmiddle> "
30 echo "<a href=\"cross_start?$base+$lanc\">$geisalc</a>"
31echo "<li><em>"
32 echol "S&eacute;curit&eacute;" "Security"
33 echo ":</em> <a href=\"geisa_form_changepasswd?$lang\">"
34 echoln "changer le mot de passe" "change your password"
35 echo "</a><br><br>"
36echo "</table>"
37echo "<hr>"
Note: See TracBrowser for help on using the repository browser.