}
therapy_sessions(){
- n=1; while [ "$(TPY session$n)" ]; do
+ n=1; while [ "$(TPY session$n)" ]; do n=$((n + 1)); done
+
+ sid=session$n
+ cat <<-EOF
+ [fieldset .tab
+ [submit "new_session" "$sid" .no . +]
+ [input .date name="${sid}_date" value="" placeholder=$(l10n date)]
+ [input .therapist name="${sid}_therapist" value="" placeholder=$(l10n therapist)]
+ [span .signature]
+ [hidden "${sid}_note1" ""]
+ ]
+ EOF
+
+ seq $((n - 1)) -1 1 | while read n; do
session_n="$n"
sid=session${session_n}
[button type="submit" name=delete_session value="$session_n" .delete $(l10n delete_session)]
]
EOF
- n=$(($n+1))
done
-
- sid=session$n
-
- cat <<-EOF
- [fieldset .tab
- [submit "new_session" "$sid" .no . +]
- [input .date name="${sid}_date" value="" placeholder=$(l10n date)]
- [input .therapist name="${sid}_therapist" value="" placeholder=$(l10n therapist)]
- [span .signature]
- [hidden "${sid}_note1" ""]
- ]
- EOF
}
cat <<EOF