-module(wiki_templates).
-export([template/5, template2/5]).
%% B = normal | locked | old
template(Node,Root,Data,Modified,Locked) ->
MenuId =
if Locked == true -> "lockedmenuframe" ;
true -> "menuframe"
end,
File = Root ++ "/WikiPreferences.files/template.html",
case wiki:file_type(File) of
error ->
%% template file missing, create default template
WobFile = Root ++ "/WikiPreferences.wob",
wiki:addFile([WobFile,"template.html"], false),
file:write_file(File,template_file());
_ ->
ok
end,
{ssi,
{rel_path,"WikiPreferences.files/template.html"}, "@@",
[{"NODE", Node},
{"ALLREFS", "allRefsToMe.yaws?node="++Node},
{"HOME", "showPage.yaws?node=home"},
{"HISTORY", "showHistory.yaws?node="++Node},
{"ALL", "allPages.yaws"},
{"LAST", "lastEdited.yaws"},
{"ZOMBIES", "wikiZombies.yaws"},
{"EDITPAGE", "editPage.yaws?node="++Node},
{"EDITFILES", "editFiles.yaws?node="++Node},
{"DATA", Data},
{"MENUID", MenuId},
{"MODIFIED", Modified}]}.
template2(Root,Title,Header,Data,Locked) ->
MenuId =
if Locked == true -> "lockedmenuframe" ;
true -> "menuframe"
end,
File = Root ++ "/WikiPreferences.files/template_info.html",
case wiki:file_type(File) of
error ->
%% template file missing, create default template
WobFile = Root ++ "/WikiPreferences.wob",
wiki:addFile([WobFile,"template_info.html"], false),
file:write_file(File,template_info_file());
_ ->
ok
end,
{ssi,
{rel_path,"WikiPreferences.files/template_info.html"}, "@@",
[{"TITLE", Title},
{"HEADER", Header},
{"DATA", Data},
{"MENUID", MenuId}]}.
template_file() ->
<<"
@@NODE@@
|
@@DATA@@
Last Modified: @@MODIFIED@@
|
|
|
">>.
template_info_file() ->
<<"
@@TITLE@@
">>.