X-Git-Url: https://git.plutz.net/?a=blobdiff_plain;f=themes%2Fdefault.sh;h=d13e849f72ece086e4fb9a456f2fbe2419ea5f3d;hb=ef53fdd21126a5b7d3df98a7cf7ea06deb36a255;hp=de357871bd49695f9a2b01efc81c1f12178b2628;hpb=077edce7af099f763d4e4cc2de6387005373c98c;p=shellwiki
diff --git a/themes/default.sh b/themes/default.sh
index de35787..d13e849 100755
--- a/themes/default.sh
+++ b/themes/default.sh
@@ -1,10 +1,25 @@
#!/bin/sh
+# Copyright 2022 - 2024 Paul Hänsch
+#
+# Permission to use, copy, modify, and/or distribute this software for any
+# purpose with or without fee is hereby granted, provided that the above
+# copyright notice and this permission notice appear in all copies.
+#
+# THE SOFTWARE IS PROVIDED âAS ISâ AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
+# SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR
+# IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
. "$_EXEC/tools.sh"
theme_head(){
local IFS="$BR"
printf '
+
'
for css in "$_BASE/%5B.%5D/cgilite/common.css" "$_BASE/%5B.%5D/themes/default.css" $PAGE_CSS; do
@@ -69,12 +84,11 @@ theme_page(){
}
theme_editor(){
- local page="$1" template="$2" title file att
- title="$(HTML "${PAGE_TITLE:-"${page}"}")"
+ local page="$1" template="$2" file att
[ "$template" ] && acl_read "$template" || template="$page"
- theme_page - "Editor: $title" <<-EOF
+ theme_page - "$(_ Editor): ${PAGE_TITLE:-"${page}"}" <<-EOF
@@ -94,17 +108,21 @@ theme_editor(){
$(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=''
- att="$(HTML "${file##*/}")"
- printf '