/[mws]/trunk/templates/master.html
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /trunk/templates/master.html

Parent Directory Parent Directory | Revision Log Revision Log


Revision 20 - (show annotations)
Fri May 7 23:35:39 2004 UTC (20 years ago) by dpavlin
File MIME type: text/html
File size: 3567 byte(s)
working calendar

1 <html>
2 <head>
3 <title>[% IF title %][% title %] -- [% END %]Mail::Box Web Search</title>
4 </head>
5
6 [% MACRO search(fld,text,link_text) BLOCK; %]
7 <a href="?search=[% fld %]:[% IF fld == "subject" %][% FILTER subject_search ; text ; END %][% ELSE ; text ; END %]">[% IF link_text ; link_text ; ELSE ; text ; END %]</a>
8 [% END %]
9
10 [% MACRO option(var, value, text) BLOCK %]
11 <option value="[% value %]"[% IF value == param.search_fld %] selected[% END %]>[% text %]</option>
12 [% END %]
13
14 [% MACRO from(message) BLOCK %]
15 <span class="from">
16 [% FOREACH f IN message.from %]
17 [% search('from_phrase',f) %][% IF !loop.last %],[% END %]
18 [% END %]
19 </span>
20 [% END %]
21
22 [% MACRO to(message) BLOCK %]
23 [% IF message.to.size %]
24 <span class="to">To:
25 [% FOREACH f IN message.to %]
26 [% search('to_phrase',f) %][% IF !loop.last %], [% END %]
27 [% END %]
28 </span>
29 [% END %]
30 [% IF message.cc.size %]
31 <span class="cc">Cc:
32 [% FOREACH f IN message.cc %]
33 [% search('cc_phrase',f) %][% IF !loop.last %], [% END %]
34 [% END %]
35 </span>
36 [% END %]
37 [% IF message.bcc.size %]
38 <span class="bcc">Bcc:
39 [% FOREACH f IN message.bcc %]
40 [% IF loop.fist %]Bcc [% END %]
41 [% search('bcc_phrase',f) %][% IF !loop.last %], [% END %]
42 [% END %]
43 </span>
44 [% END %]
45 [% END %]
46
47 [% MACRO date(msg) BLOCK %]
48 <span class="date">[% msg.date %]</span>
49 [% END %]
50
51 [% MACRO usage_list(list,key,description) BLOCK %]
52 [% IF list %]
53 <div class="[% key %]">
54 [% description %]
55 [% FOREACH l IN list %]
56 <br><a href="?search=from_phrase:[% l.name %]">[% l.name %]</a>&nbsp;<span class="counter">[% l.usage %]</span>
57 [% END %]
58 </div>
59 [% END %]
60 [% END %]
61
62 <body>
63
64 <table border="0" width="100%">
65 <tr>
66 <td colspan="2">
67
68 <form>
69 Search
70 <select name="search_fld">
71 [% option("search_fld","message","anywhere") %]
72 [% option("search_fld","subject","message subject") %]
73 [% option("search_fld","body","message text") %]
74 [% option("search_fld","from_phrase","sender name") %]
75 [% option("search_fld","from_address","sender address") %]
76 [% option("search_fld","to_phrase","recipient name") %]
77 [% option("search_fld","to_address","recipient address") %]
78 [% option("search_fld","cc_phrase","also to name") %]
79 [% option("search_fld","bcc_phrase","sneek to name") %]
80 </select>
81 <input type="text" name="search_val" size=20 value="[% param.search_val %]">
82 </select>
83 <input type="submit" name="submit" value="Go!">
84 </form>
85
86 </td>
87 </tr>
88
89 <tr>
90 <td valign="top" width="90%">
91
92 [% IF results %]
93 [% INCLUDE results.html %]
94 [% ELSIF message %]
95 [% INCLUDE message.html %]
96 [% END %]
97
98 </td>
99 <td valign="top">
100
101 [% USE cal = Calendar.Simple(mm,yyyy) %]
102
103 [% PERL %]
104 $stash->set( get_cal => sub {
105 my $cal = shift;
106 my $yyyy = shift || return "BUG2";
107 my $mm = shift || return "BUG3";
108 my $day = shift || return "&nbsp;";
109
110 return $day if (! $cal); # no calendar entries
111
112 my $yyyymm = sprintf("%04d-%02d",$yyyy,$mm);
113 my $dd = sprintf("%02d",$day);
114
115 if ($cal->{$yyyymm}->{$dd}) {
116 return "<a href=\"/$yyyy/$mm/$dd/\" title=\"".$cal->{$yyyymm}->{$dd}."\">$day</a>";
117 } else {
118 return $day;
119 }
120 } );
121 [% END %]
122
123 <table border="0">
124 <tr><th colspan="7"><a href="/[% yyyy ; "/" ; mm %]/">[% yyyy ; "-" ; mm %]</a></th></tr>
125 [% FOREACH row = cal.rows %]
126 <tr>
127 [% FOREACH col = row %]
128 <td align="right">[% get_cal(calendar,yyyy,mm,col) %]</td>
129 [% END %]
130 </tr>
131 [% END %]
132 </table>
133
134 <br>
135 Thread
136
137 [% usage_list(counters.from,'from','From') %]
138
139 [% usage_list(counters.to,'to','To') %]
140
141 [% usage_list(counters.cc,'cc','Cc') %]
142
143 <br>
144 Lists
145
146 <br>
147 Links
148
149 <br>
150 [% USE dumper ; dumper.dump(calendar) %]
151
152 </td>
153
154 </tr>
155
156
157 </table>
158
159 </body>

  ViewVC Help
Powered by ViewVC 1.1.26