Rev 2221 | Rev 2487 | 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 |
||
4 | Here is the file for download ($flen bytes): |
||
5 | <p><center> |
||
6 | !getfile $fname $file |
||
7 | <p> |
||
8 | !goto end2 |
||
9 | !endif |
||
10 | |||
11 | !if $erase=ask |
||
12 | Do you really want to erase the file |
||
13 | <tt><font color=green>$file</font></tt>? <br> |
||
14 | <small>($flen bytes, $facc, last modified $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 |
||
24 | <tt><font color=green>$file</font></tt> is an image. ($flen bytes, |
||
25 | $facc, last modified $fdat) |
||
26 | !if $pubimg!=$empty |
||
27 | <p><center> |
||
28 | <img border=2 src=$pubimg> |
||
29 | </center> |
||
30 | !endif |
||
31 | !goto end |
||
32 | !endif |
||
33 | |||
34 | !if $ftype=binary |
||
35 | <tt><font color=green>$file</font></tt> is a binary file. ($flen bytes, |
||
36 | $facc, last modified $fdat) |
||
37 | !goto end |
||
38 | !endif |
||
39 | |||
40 | !if $flen>$MAX |
||
41 | <tt><font color=green>$file</font></tt> is too long ($flen bytes) |
||
42 | to be shown or edited. |
||
43 | !goto end |
||
44 | !endif |
||
45 | |||
46 | !set wims_form_method=post |
||
47 | !form reply |
||
48 | <input type=hidden name=job value=file> |
||
49 | <input type=hidden name=job2 value=first> |
||
50 | <center> |
||
51 | Content of <tt><font color=green>$file</font></tt> <br> |
||
52 | <small>($flen bytes, $facc, last modif. $fdat)</small> <br> |
||
53 | !if $modifok!=yes |
||
54 | This file belongs to the distribution, it should not be modified. <br> |
||
55 | !set textarea_ro=readonly |
||
56 | !endif |
||
57 | !mexec scripts/textarea.sh |
||
58 | <br> |
||
59 | !if $modifok=yes |
||
2221 | bpr | 60 | <input type=submit name=save value="$wims_name_tosave"> |
61 | <input type=submit name=abandon value="$wims_name_giveup"> |
||
23 | reyssat | 62 | !endif |
63 | </center> |
||
64 | </form> |
||
65 | |||
66 | :end |
||
67 | |||
68 | <p> <center> |
||
69 | !href cmd=reply&job=file&job2=download Download the file |
||
70 | . |
||
71 | !if $modifok=yes |
||
2221 | bpr | 72 | !href cmd=reply&job=file&job2=erase $wims_name_erase |
23 | reyssat | 73 | . |
74 | !endif |
||
75 | |||
76 | :end2 |
||
2486 | bpr | 77 | !href cmd=reply&job=fs $wims_name_back2 |
23 | reyssat | 78 | . |
79 | |||
80 | </center> |
||
81 |