commit - 0927012cb2e545e54ed80a5ac29d377e80813c73
commit + 90d47b8788013aae88dd6ce2151816559981559c
blob - a332caed58809222d5e3fc8088715dbd55b25e34
blob + b6a52303bf93001152ffa036f3837d803c002d6a
--- regress/gotd/http-server
+++ regress/gotd/http-server
die "no Content-Length header" unless defined $clen;
if (defined $hmac_signature) {
- die "no HMAC secret provided" if not (defined $hmac_secret);
+ die "no Hmac secret provided" unless defined $hmac_secret;
my $sha256 = Digest->new("SHA-256");
$hmac = Digest::HMAC->new($hmac_secret, $sha256);
}