From: Paul Hänsch <paul@plutz.net>
Date: Wed, 27 Jul 2022 12:01:29 +0000 (+0200)
Subject: Squashed 'cgilite/' changes from 5038774..9a07596
X-Git-Url: https://git.plutz.net/?p=webpoll;a=commitdiff_plain;h=4f6c45f6bef36f8033bb9f93cfdcff050d3f0b02

Squashed 'cgilite/' changes from 5038774..9a07596

9a07596 bugfix/typo: correct transformation of header fields into web server variable names

git-subtree-dir: cgilite
git-subtree-split: 9a075962cbcf68050e57afa257bae4232cc197ee
---

diff --git a/cgilite.sh b/cgilite.sh
index 2193e29..b51ee8e 100755
--- a/cgilite.sh
+++ b/cgilite.sh
@@ -264,7 +264,7 @@ HEADER(){
     str="${str#*${BR}${1}: }"
     printf %s "${str%%${BR}*}"
   else
-    local var="HTTP_$(printf %s "$1" |tr a-z- A-Z-)"
+    local var="HTTP_$(printf %s "$1" |tr a-z- A-Z_)"
     eval "[ \"\$$var\" ] && printf %s \"\$$var\" || return 1"
     # eval "printf %s \"\$HTTP_$(printf %s "${1}" |tr a-z A-Z |tr -c A-Z _)\""
   fi