From: Paul Hänsch <paul@plutz.net>
Date: Mon, 7 Sep 2020 10:05:30 +0000 (+0200)
Subject: disable autosubmit, submit when using back-button
X-Git-Url: https://git.plutz.net/?a=commitdiff_plain;h=35c5b60b39742a649d6196a6773754272b475bbd;p=lobster

disable autosubmit, submit when using back-button
---

diff --git a/therapies/page.sh b/therapies/page.sh
index a36505f..56b5865 100755
--- a/therapies/page.sh
+++ b/therapies/page.sh
@@ -93,7 +93,7 @@ cat <<EOF
 [h1 $(l10n therapy)]
 
 [div .patient
-  [h2 . [a "/cards/#${id%.*}.vcf" &#x2b05; $(VCF FN |HTML)]]
+  [h2 . &#x2b05; $(VCF FN |HTML)]
 ]
 
 [div .therapies
@@ -154,6 +154,8 @@ cat <<EOF
 [form #report method=POST action="/therapies/update_therapy.sh"
   [hidden "id" "$id"][hidden "tid" "$(transid "$tpyfile")"]
 
+  [button #backbutton type=submit name="vcfreturn" value="true" &#x2b05; $(VCF FN |HTML)]
+
   [input .stickynote type=checkbox name=c_stickynote #show_stickynote]
   [fieldset .stickynote
     [label for="show_stickynote" $(l10n notes)]
@@ -222,5 +224,5 @@ cat <<EOF
 [span #jsdebug style="display: none; position: fixed; right:0; bottom:0" Debug]
 
 [script type="text/javascript" src="/therapies/therapy_draw.js"]
-[script type="text/javascript" src="/therapies/autosave.js"]
+[!-- script type="text/javascript" src="/therapies/autosave.js" --]
 EOF
diff --git a/therapies/therapy.css b/therapies/therapy.css
index 323f048..90eb027 100644
--- a/therapies/therapy.css
+++ b/therapies/therapy.css
@@ -35,6 +35,17 @@ form > button[type=submit]:hover {
   background-color: #FEE;
 }
 
+form > button#backbutton {
+  position: absolute;
+  top: 2em;
+  left: 2%;
+  background: transparent;
+  border: none;
+  padding: 0;
+  margin: 0;
+}
+
+
 input.tab { display: none; }
 input.tab + label.tab { display: block; }
 input.tab + label.tab::before { content: '\25b8 \00a0'; float: left;}
diff --git a/therapies/update_therapy.sh b/therapies/update_therapy.sh
index 0474b3b..c72d040 100755
--- a/therapies/update_therapy.sh
+++ b/therapies/update_therapy.sh
@@ -125,6 +125,8 @@ if [ "$(POST autosubmit)" = "true" ]; then
   msg="$(transid "$tpyfile")"
   printf 'HTTP/1.1 200 OK\r\nContent-Length: %i\r\n\r\n%s' \
          "${#msg}" "${msg}"
+elif [ "$(POST vcfreturn)" ]; then
+  REDIRECT "/cards/#${tpy%.*}.vcf"
 else
   REDIRECT "/therapies/${tpy%.*}/${tpy#*.}"
 fi