+ local page="$1" template="$2" title file att
+ title="$(HTML "${PAGE_TITLE:-"${page}"}")"
+
+ [ "$template" ] && acl_read "$template" || template="$page"
+
+ theme_page - "Editor: $title" <<-EOF
+ <input checked type=radio class=tab name=edithelp value=edtr id=editor><label for=editor>$(_ Editor)</label>
+ <input type=radio class=tab name=edithelp value=help id=syntax><label for=syntax>$(_ Syntax)</label>
+ <input type=radio class=tab name=edithelp value=att id=attach><label for=attach>$(_ Attachments)</label>
+ $([ "$LANGUAGE_DEFAULT" -a "$LANGUAGE_DEFAULT" != "$LANGUAGE" ] && printf '
+ <input type=radio class=tab name=edithelp value=att id=transl><label for=transl>%s</label>
+ ' "$LANGUAGE_DEFAULT"
+ )
+ <form class="tab editor" method=POST action="$(HTML "${_BASE}${page%/}/[edit]")">
+ <input type=hidden name=session_key value="${SESSION_KEY}"/>
+ <textarea name=pagetext>$({ wiki_text "$page" \
+ || wiki_text "$template"; } |HTML)</textarea>
+ <button type=submit name=action value=update>$(_ Update)</button>
+ <button type=submit name=action value=cancel>$(_ Cancel)</button>
+ </form>
+ <div class="tab syntax">$(wiki "/[wiki]/editorhelp/")</div>
+ <div class="tab attach">
+ $(for file in "$_EXEC/pages/${page%/:$LANGUAGE/}/#attachments"/* "$_DATA/pages/${page%/:$LANGUAGE/}/#attachments"/*; do
+ [ "$file" = "$_EXEC/pages/${page%/:$LANGUAGE/}/#attachments/${file##*/}" \
+ -a -f "$_DATA/pages/${page%/:$LANGUAGE/}/#attachments/${file##*/}" ] && continue
+ att="$(HTML "${file##*/}")"
+ url="$(printf %s\\n "${file##*/}" |sed 's;[\\<>];\\&;g' |HTML)"
+ name="$(printf %s\\n "${file##*/}" |sed 's;[]\\[];\\&;g' |HTML)"
+ case ${file##*/} in
+ \*) continue;;
+ *.[pP][nN][gG]|*.[jJ][pP][gG]|*.[jJ][pP][eE][gG]|*.[gG][iI][fF])
+ [ "$page" != "${page%/:$LANGUAGE/}" ] && p=../ || p=''
+ printf '<p class=aimg><img src="%s%s">![](<%s>)</p><ul class=aimg>
+ <li>[%s](<[attachment]/%s>)</li>
+ <li>[![%s](<%s>)](<[attachment]/%s>)</li>
+ </ul>' \
+ "$p" "$att" "$url" "$name" "$url" "$name" "$url" "$url"
+ ;;
+ *)
+ printf '<p class="adoc">[%s](<%s>)</p>' "$name" "$url"
+ ;;
+ esac
+ done)
+ </div>
+ $(if [ "$LANGUAGE_DEFAULT" -a "$LANGUAGE_DEFAULT" != "$LANGUAGE" ]; then
+ printf '<div class="tab transl">%s</div>' "$(LANGUAGE='' wiki_text "${page%/:$LANGUAGE/}" |HTML)"
+ fi)
+ EOF
+}