[show modes: view edit]
[begin preamble]
if(title2id(_title) != _id)
_bestlink = {id=[_id]}
else
_bestlink = urlencode(_title);
universe_dropdown = function {
<select name="unvid" style="width: 80%;">
[
tmp = title2id({Universe});
foreach (query_run("id", query("universes", 0, "title collate utf8mb4_general_ci", "template", tmp))) _data = {[
if(can_comment(_data)) {
<option value="[_data]">[get_title(_data)] (Universe)</option>
}
]};
tmp = title2id({Language Family});
foreach (query_run("id", query("families", 0, "title collate utf8mb4_general_ci", "template", tmp))) _data = {[
if(can_comment(_data)) {
<option value="[_data]">[get_title(_data)] (Family)</option>
}
]}
]
</select>
};
setgrc = function($page, $g) {[
var old_group = get_group($page);
if ($g == old_group) {[
return
]}
set_group($page, $g);
var hcount = 1;
var hsum = 0;
while(hcount > 0) {[
mute command({update entries as A
inner join entries as B on A.parent = B.id
set A.group = [$g]
where B.group = [$g];
});
$remaining = retrieve({
select count(A.id) as e
from entries as A
inner join entries as B on A.parent = B.id
where B.group = [$g] and A.group = [old_group];
});
hcount = $remaining[0]["e"];
debug($remaining);
debug("hcount: " & hcount & " children of " & $g);
hsum += hcount;
]};
{
Page moved! [if(hsum > 0) {[hsum] child pages also changed to the new parent's group.}]
};
]};
[end preamble]
[begin mode index][if(_body == "") if(count(_children()) == 0) return;
if(getv("redirect") == "") {
<li><a href="/?[_bestlink]"><b>[$_title]</b></a> <i>[$_subtitle]</i>
<span style="font-size: 70%; display: block">started by: [if(_owner.profile_id != 0) {<a href="/?id=[_owner.profile_id]">[_owner.name]</a>} else _owner.name]
</li>}]
[end mode index]
[begin mode move_submit]
[
if(can_direct() && can_comment($_params.unvid)) {
[
$_lastp = $_parent;
$grp = get_group($_params.unvid);
setgrc($_id, $grp);
set_parent($_id, $_params.unvid);
]
<p><b>[$_title]</b> has been moved from <b>[get_title($_lastp)]</b>
to <b>[get_title($_params.unvid)]</b>.</p>
} else {
<p><b>[$_title]</b> could not be moved from <b>[get_title($_parent)]</b> to
<b>[get_title($_parent)]</b> by you ([$_viewer.name]). If you feel that
should be able to do so, now might be a good time to
<a href="mailto:[$_globals.ADMIN_EMAIL]"> write a letter to the administrator</a>.</p>
}]
<p><a href="/?id=[$_parent]">Return to [get_title($_parent)]</a> or <br>
<a href="/?id=[$_params.unvid]">Go to [get_title($_params.unvid)]</a></p>
[end mode move_submit]
[begin mode move]
<table class="front_table">
<form method="post" action="/">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="create" value="1">
<input type="hidden" name="mode" value="move_submit">
<tr>
<td>[universe_dropdown()]<label for="submit"><input type="submit" id="submit" value="Move">Move the family to this page.</label>
</tr>
</form>
</table>
[end mode move]
[begin mode view]
[if(getv("redirect") != "") {[
http_header({HTTP/1.1 307 Temporary Redirect});
http_header({Location: [bare_url()]?id=[getv("redirect")]});
]};
page("view", 278);
if(_group != 0) {[
gpid = get_group_profile_id(_group);
if(gpid != 0) page("css", gpid);
]};
$e = getv("picture");
if($e != "") {<img src="[info_display($e)]" style="max-width: 50%; float: right; margin-left: 10px; margin-bottom: 10px;">};]
[_wiki_format(getv("description"), "1");]
[$d = search("abbr", "parent", $_id, "template", title2id("Recursive Wiki Page"));]
[$di = search("table", "parent", $_id, "template", title2id("Language"));]
[$dic = search("abbr", "parent", $_id, "template", title2id("Dictionary"));]
[$df = search("table", "parent", $_id, "template", title2id("Language Family"));]
[if($df != "") {
<h2>Subfamilies</h2>
<table class="front_table">
[$df]
</table>
};]
[if($di != "") {
<h2>Languages</h2>
<table class="front_table">
[$di]
</table>
};]
[if($dic != "") {
<h2>Dictionaries</h2>
<ul>
[$dic]
</ul>
};]
[if($d != "") {
<h2>Articles</h2>
<ul>
[$d]
</ul>
};]
[if(can_comment()) {
<p><b>Create New</b>: <a href="/?id=[$_id]&mode=add">Article</a> · <a href="/?id=[$_id]&mode=add_lang">Language</a> · <a href="/?id=[$_id]&mode=add_dict">Dictionary</a> · <a href="/?id=[$_id]&mode=add_family">Subfamily</a></p>
};]
[if(can_direct()) {
[msg_start({clear: both; text-align: center;})]
<!-- <a href="/edit_group.star?id=[$_group]">Edit Users and Permissions</a> · --> <a href="/?id=[$_id]&mode=edit">Edit This Page</a>
[msg_end()]
};
]
<div style="clear: both;"></div>
[end mode view]
[begin mode abbr]
[
iif(can_read(), {
<li>[if(getv("redirect") != "") {<b><a href="./?id=[getv("redirect")]">[$_title]</a></b><span style="font-size: 60%; display: inline-block; vertical-align: top"> ↗[if(can_edit()) { <a href="./?id=[_id]&mode=edit">(edit)</a> }]</span>} else {<b><a href="./?[_bestlink]">[$_title]</a></b>}]</li>
});
]
[end mode abbr]
[begin mode table]
<tr><th>[if(getv("redirect") != "") {
<a href="./?id=[getv("redirect")]">[$_title]</a>
} else {
<a href="./?[_bestlink]">[$_title]</a>
}]
<td>[_wiki_format(getv("synopsis"), "inline")]
[if(getv("redirect") != "") {
<span style="font-size: 60%; display: inline-block; vertical-align: top">
[if(can_edit()) {<a href="./?id=[_id]&mode=edit">(edit)</a> }]
</span>
}]
[end mode table]
[begin mode floatpic]
[$e = getv("picture");
if($e != "") {
<p style="text-align: right">
<a href="/?[_bestlink]"><img src="[info_display($e)]" title="[$_title]" style="max-height: 60px;"></a>
</p>
}]
[end mode floatpic]
[begin mode edit]
<form action="/" method="post">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="mode" value="submit">
<table style="width: 100%">
<tr><th>Name:<td><input type="text" name="title" value="[edit_display($_title)]" style="width: 100%">
<tr><th>Subtitle: <td><input type="text" name="subtitle" value="[edit_display($_subtitle)]" style="width: 100%">
<tr><th>Synopsis:<td><input type="text" name="synopsis" value="[edit_display(getv("synopsis"))]" style="width: 100%">
<tr><th>Picture URL:<td><input type="text" name="picture" value="[edit_display(getv("picture"))]" style="width: 100%;">
<tr><th>Redirect:<td><input type="text" name="redirect" value="[edit_display(getv("redirect"))]"> (specify the ID number of another page to redirect to.)
<tr><th>Description:<td><textarea name="description" rows="10" style="width: 100%;">[edit_display(getv("description"));]</textarea>
<br>
<span style="font-size: 80%">You can use some formatting here. See <a href="/?Formatting and Markup" target="_new">this page</a> for more details.</span>
<tr><td><td><input type="submit" value="Submit">
<br><a href="/?id=[_id]&mode=delete">delete this language family</a>
<br><a href="/?id=[_id]&mode=move">move this language family</a>
</table>
</form>
[end mode edit]
[begin mode submit]
[
$_title = $_params.title;
// set_group_name($_group, $_params.title);
$_subtitle = $_params.subtitle;
putv("picture", $_params.picture);
putv("description", $_params.description);
putv("synopsis", $_params.synopsis);
putv("redirect", $_params.redirect);
if(title2id(_title) != _id)
_bestlink = {id=[_id]}
else
_bestlink = urlencode(_title);
refresh_to({./?[_bestlink]}, 1);
]
<h2>Update Complete</h2>
<p><a href="/?[_bestlink]">Click here to return to the language family</a>.</p>
[end mode submit]
[begin mode add]
<form method="post" action="/">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="mode" value="add_submit">
<b>Article Title</b>: <input type="text" name="title">
<input type="submit" value="Create">
</form>
[end mode add]
[begin mode add_submit]
[
$e = new_page($_params.title, $_id);
if($e > 0) {
[
set_template($e, title2id("Recursive Wiki Page"));
set_group($e, $_group);
set_permissions($e, "cadrecadrecadre---r-");
page("edit", $e);
]
} else {
[msg_start();]
Disaster. It failed! Maybe you should check the error log.
[msg_end();]
};
]
[end mode add_submit]
[begin mode add_dict]
<form method="post" action="/">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="mode" value="add_dict_submit">
<b>Dictionary Title</b>: <input type="text" name="title">
<input type="submit" value="Create">
<p>Use this for dictionaries that don't belong to a specific or well-developed language within the family, such as a poorly-understood ancestor language or a set of common terms.</p>
</form>
[end mode add_dict]
[begin mode add_dict_submit]
[
$e = new_page($_params.title, $_id);
if($e > 0) {
[
set_template($e, title2id("Dictionary"));
set_group($e, $_group);
set_permissions($e, "cadrecadrecadre---r-");
page("edit", $e);
]
} else {
[msg_start();]
Disaster. It failed! Maybe you should check the error log.
[msg_end();]
};
]
[end mode add_dict_submit]
[begin mode add_lang]
<form method="post" action="/">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="mode" value="add_lang_submit">
<b>Language Name</b>: <input type="text" name="title">
<input type="submit" value="Create">
</form>
[end mode add_lang]
[begin mode add_lang_submit]
[
$e = new_page($_params.title, $_id);
if($e > 0) {
[
set_template($e, title2id("Language"));
set_group($e, $_group);
set_permissions($e, "cadrecadrecadre---r-");
page("edit", $e);
]
} else {
[msg_start();]
Disaster. It failed! Maybe you should check the error log.
[msg_end();]
};
]
[end mode add_lang_submit]
[begin mode add_family]
<form method="post" action="/">
<input type="hidden" name="id" value="[$_id]">
<input type="hidden" name="mode" value="add_family_submit">
<b>Subfamily Name</b>: <input type="text" name="title">
<input type="submit" value="Create">
</form>
[end mode add_family]
[begin mode add_family_submit]
[
$e = new_page($_params.title, $_id);
if($e > 0) {
[
set_template($e, title2id("Language Family"));
set_group($e, $_group);
set_permissions($e, "cadrecadrecadre---r-");
page("edit", $e);
]
} else {
[msg_start();]
Disaster. It failed! Maybe you should check the error log.
[msg_end();]
};
]
[end mode add_family_submit]
