changeset 763:41e443a925c8

Introduce unsetpar() for continuous page building
author HIROSE Yuuji <yuuji@gentei.org>
date Sun, 07 Jun 2020 07:33:12 +0900
parents f9f88278f6a0
children f36f1f148a4f d39c915daeda
files s4-funcs.sh
diffstat 1 files changed, 11 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/s4-funcs.sh	Sat Jun 06 20:55:30 2020 +0900
+++ b/s4-funcs.sh	Sun Jun 07 07:33:12 2020 +0900
@@ -677,6 +677,16 @@
   fi
   query "replace into par values('$session', '$1', '$2', \"$3\");"
 }
+unsetpar() {
+  for i; do
+    if [ x"$session" = x"$main_session" ]; then
+      case "$i" in
+	user|skey) unset _$i ;;
+      esac
+    fi
+    query "DELETE FROM par WHERE var='$i';"
+  done
+}
 replpar() {
   query "update par set val=\"$3\" where sessid='$session' and var='$1' and type='$2';"
 }
@@ -1717,6 +1727,7 @@
 	 (select id from blog_s where key='owner' and val=$qgname);"
 	err rm-grp cleaning sql=`echo $sql`
 	query "$sql";
+	unsetpar tag kwd
 	grps			# When removing a group, switch to grp-list
 	return			# and return
       fi

yatex.org