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