top link in client list

[lobster] / therapies / page.sh

diff --git a/therapies/page.sh b/therapies/page.sh
index bbe845b66f2b76ea2b1e4a6f396a7fcd28158924..a53bb923f7c689888873fac2de87e86a6335c8df 100755 (executable)
--- a/therapies/page.sh
+++ b/therapies/page.sh
@@ -57,7 +57,7 @@ therapy_sessions(){
        ]
        EOF
 
-  seq $((n - 1)) -1 1 | while read n; do
+  for n in $(seq $((n - 1)) -1 1); do
     session_n="$n"
     sid=session${session_n}
 
@@ -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
@@ -116,7 +116,7 @@ cat <<EOF
     fi
   done |sort -n
   )
-  [a .item .therapy href="/therapies/${id%%.*}/new" . +]
+  [!-- a .item .therapy href="/therapies/${id%%.*}/new" . + --]
 ]
 EOF
 
@@ -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