Rev 5696 | Rev 5754 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
23 | reyssat | 1 | !set MAX=102400 |
2 | |||
3 | !if $download=yes |
||
2487 | bpr | 4 | $name_file ($flen $name_bytes): |
23 | reyssat | 5 | <p><center> |
6 | !getfile $fname $file |
||
7 | <p> |
||
8 | !goto end2 |
||
9 | !endif |
||
10 | |||
11 | !if $erase=ask |
||
2487 | bpr | 12 | $name_erase |
3881 | bpr | 13 | <tt><font color="green">$file</font></tt>? <br> |
2514 | bpr | 14 | <small>($flen $name_bytes, $facc, $name_last $fdat)</small> |
1045 | bpr | 15 | <p> <center> <font size="+2"> |
2221 | bpr | 16 | !href cmd=reply&job=$job&job2=eraseconfirm $wims_name_yes |
23 | reyssat | 17 | |
2221 | bpr | 18 | !href cmd=reply&job=fs $wims_name_no |
23 | reyssat | 19 | </font> <p> <hr> |
20 | !goto end2 |
||
21 | !endif |
||
22 | |||
23 | !if $ftype=image |
||
3881 | bpr | 24 | <tt><font color="green">$file</font></tt> $name_image. ($flen $name_bytes, |
2487 | bpr | 25 | $facc, $name_last $fdat) |
23 | reyssat | 26 | !if $pubimg!=$empty |
27 | <p><center> |
||
5696 | bpr | 28 | <img border="2" src="$pubimg" alt="$pubimg" /> |
23 | reyssat | 29 | </center> |
30 | !endif |
||
31 | !goto end |
||
32 | !endif |
||
33 | |||
34 | !if $ftype=binary |
||
3881 | bpr | 35 | <tt><font color="green">$file</font></tt> $name_binary. ($flen $name_bytes, |
2487 | bpr | 36 | $facc, $name_last $fdat) |
23 | reyssat | 37 | !goto end |
38 | !endif |
||
39 | |||
40 | !if $flen>$MAX |
||
3881 | bpr | 41 | <tt><font color="green">$file</font></tt> ($flen $name_bytes) |
2487 | bpr | 42 | $name_toolong |
43 | |||
23 | reyssat | 44 | !goto end |
45 | !endif |
||
46 | |||
47 | !set wims_form_method=post |
||
48 | !form reply |
||
5734 | bpr | 49 | <input type="hidden" name="job" value="file"/> |
50 | <input type="hidden" name="job2" value="first"/> |
||
23 | reyssat | 51 | <center> |
3881 | bpr | 52 | $name_content <tt><font color="green">$file</font></tt> <br> |
2514 | bpr | 53 | <small>($flen $name_bytes, $facc, $name_last $fdat)</small> <br> |
23 | reyssat | 54 | !if $modifok!=yes |
2487 | bpr | 55 | $name_distrib <br> |
23 | reyssat | 56 | !set textarea_ro=readonly |
57 | !endif |
||
58 | !mexec scripts/textarea.sh |
||
59 | <br> |
||
60 | !if $modifok=yes |
||
5734 | bpr | 61 | <input type="submit" name="save" value="$wims_name_tosave"/> |
62 | <input type="submit" name="abandon" value="$wims_name_giveup"/> |
||
23 | reyssat | 63 | !endif |
64 | </center> |
||
65 | </form> |
||
66 | |||
67 | :end |
||
68 | |||
69 | <p> <center> |
||
2487 | bpr | 70 | !href cmd=reply&job=file&job2=download $name_download |
3070 | bpr | 71 | |
23 | reyssat | 72 | !if $modifok=yes |
3070 | bpr | 73 | !set wims_ref_class=wims_button |
2221 | bpr | 74 | !href cmd=reply&job=file&job2=erase $wims_name_erase |
3070 | bpr | 75 | |
23 | reyssat | 76 | !endif |
77 | |||
78 | :end2 |
||
2486 | bpr | 79 | !href cmd=reply&job=fs $wims_name_back2 |
23 | reyssat | 80 | . |
81 | |||
82 | </center> |
||
83 |