/[pub]/suikawiki/script/misc/plugins/Menu.wps
Suika

Contents of /suikawiki/script/misc/plugins/Menu.wps

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (show annotations) (download)
Sat May 10 04:28:25 2003 UTC (22 years, 8 months ago) by wakaba
Branch: MAIN
Branch point for: branch-suikawiki-1
New

1 Name:
2 Menu
3 FullName:
4 SuikaWiki: menu
5 URI:
6 IW:SuikaWiki:SuikaWiki
7
8 MODULE:
9 SuikaWiki::View->definition (WithMenu => {
10 media => {type => 'text/html', charset => 1, expires => 120},
11 #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 120},
12 template => <<EOH});
13 %html-document(title=>{%res(name=>{View:WebPageTitle});}p,link-meta=>{%predefined-template(name=>links);}p,content=>{
14 %section(level=>1,add-to-toc=>0,type=>body,title=>{%ns-short-page-name;}p,heading,content=>{
15 %block(id=>myuri,content=>{%img-favicon(use-page-icon);%uri-wiki;}p);
16 %section(id=>tools1,class=>tools,add-to-toc=>0,content=>{
17 %anchor-wiki(rel=>view,up-to-date,mode=>default,class=>wiki-cmd,label=>{%res(name=>ReloadThisPage);}p,title=>{%res(name=>ReloadThisPageLong);}p);
18 %predefined-template(name=>navbar);
19 }p);
20 %section(id=>content-frame,add-to-toc=>0,content=>{
21 %section(level=>2,id=>read,add-to-toc=>0,content=>{%read(comment);}p);
22 %section(level=>2,id=>see-also,title=>{%res(name=>SeeAlso);}p,heading,content=>{%search-result;}p);
23 %section(level=>2,id=>referer,title=>{%res(name=>Referer);}p,heading,content=>{%referer-list;}p);
24 %section(level=>2,id=>toc,title=>{%res(name=>{TOC:Title};}p,heading,add_to_toc=>0,content=>{%toc(drag);}p);
25 %section(id=>last-modified,add_to_toc=>0,content=>{%res(name=>{LastModified=});%last-modified;}p);
26 %section(class=>tools,add_to_toc=>0,content=>{%predefined-template(name=>navbar);}p);
27 %section(id=>footer,add-to-toc=>0,content=>{%predefined-template(name=>footer);}p);
28 }p);
29 %section(level=>2,id=>side-menu,add-to-toc=>0,content=>{%read(page=>{@{[$main::PageName{MenuBar}]}});}p);
30 }p);
31 }p);
32 EOH
33
34 SuikaWiki::View->definition (mininav => {
35 media => {type => 'text/html', charset => 1, expires => 120},
36 #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 120},
37 template => <<EOH});
38 %html-document(title=>{%res(name=>{View:WebPageTitle});}p,link-meta=>{%predefined-template(name=>links);}p,content=>{
39 %section(level=>1,add-to-toc=>0,type=>body,content=>{
40 %section(level=>2,id=>side-menu,class=>mininav,add-to-toc=>0,content=>{
41 %read(page=>{@{[$main::PageName{MenuBar}]}});
42 %anchor-wiki(rel=>view,mode=>mininav,class=>wiki-cmd,target=>_self,label=>{%res(name=>ReloadThisPage);}p,title=>{%res(name=>ReloadThisPageLong);}p);
43 }p);
44 }p);
45 }p);
46 EOH
47 # TODO: Any//Name//Space//MenuBar (like favicon)
48
49 SuikaWiki::View->template ('links')->add_line (q(%link-wiki(page=>"Wiki//MenuBar",mode=>mininav,rel=>"sidebar navigator",class=>wiki);));
50
51 POD:LICENSE:
52 Copyright 2003 Wakaba <w@suika.fam.cx>
53
54 %%GNUGPL2%%

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24