X-Git-Url: http://git.plutz.net/?a=blobdiff_plain;f=themes%2Fdefault.sh;h=563ea3afdbd8676a428bbb3b3fec30a57bff680e;hb=2c724512b2e744027ae0a43d571f2e0c9fd820f3;hp=89d4fad6c12c934dc71dd2f61a89903c6592676b;hpb=818bd92b936bf3c66a4be47481be3c1fdf244523;p=shellwiki
diff --git a/themes/default.sh b/themes/default.sh
index 89d4fad..563ea3a 100755
--- a/themes/default.sh
+++ b/themes/default.sh
@@ -3,11 +3,14 @@
. "$_EXEC/tools.sh"
theme_head(){
+ local IFS="$BR"
printf '
-
-
-
- ' "$_BASE"
+
+ '
+ for css in "$_BASE/%5B.%5D/cgilite/common.css" "$_BASE/%5B.%5D/themes/default.css" $PAGE_CSS; do
+ printf '' \
+ "$(HTML "${css##*//}")"
+ done
}
theme_header(){
@@ -24,24 +27,27 @@ theme_pagemenu(){
if acl_write "$page"; then
printf '
'
fi
}
theme_page(){
local page="$1" title="$2"
- title="$(HTML "${title:-"${page}"}")"
+ title="$(HTML "${title:-"${PAGE_TITLE:-"${page}"}"}")"
# Important! Web Server response including newline
printf "%s\r\n" "Content-Type: text/html; charset=utf-8" ""
cat <<-EOF
-
+
$(theme_head)
${title}
@@ -62,29 +68,47 @@ theme_page(){
}
theme_editor(){
- local page="$1" template="$2" title
- title="${page%/}"; title="${title##*/}"
+ local page="$1" template="$2" title file att
+ title="$(HTML "${PAGE_TITLE:-"${page}"}")"
[ "$template" ] && acl_read "$template" || template="$page"
theme_page - "Editor: $title" <<-EOF
-
+ $(wiki "/[wiki]/editorhelp/")
+
+ $(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
+ case ${file##*/} in
+ \*) continue;;
+ *.[pP][nN][gG]|*.[jJ][pP][gG]|*.[jJ][pP][eE][gG]|*.[gG][iI][fF])
+ [ "$page" != "${page%/:$LANGUAGE/}" ] && p=../ || p=''
+ att="$(HTML "${file##*/}")"
+ printf '
![](%s)
- [%s]([attachment]/%s)
- [![%s](%s)]([attachment]/%s)
' \
+ "$p" "$att" "$att" "$att" "$att" "$att" "$att" "$att"
+ ;;
+ *)
+ att="$(HTML "${file##*/}")"
+ printf '
[%s](%s)
' "$att" "$att"
+ ;;
+ esac
+ done)
+
EOF
}
-theme_revisions(){
- local page="$1" title
- title="${page%/}"; title="${title##*/}"
-
- "$_EXEC/macros/revisions" "$page" \
- | theme_page - "Revisions: $title"
-}
+theme_revisions(){ theme_page "$@"; }
theme_attachments(){
local page="$1" title
@@ -93,13 +117,21 @@ theme_attachments(){
if acl_write "$page"; then
theme_page - "Attachments: $title" <<-EOF
-
EOF
else
theme_page - "Attachments: $title" <<-EOF
@@ -143,7 +189,7 @@ theme_error(){
500) printf "%s\r\n" "Status: 500 Internal Server Error";;
esac
- if [ "$(mdfile "/[wiki]/$errno/")" ]; then
+ if mdfile "/[wiki]/$errno/" >&-; then
theme_page "/[wiki]/$errno/"
else
printf "Content-Length: 0\r\n\r\n"