diff options
| author | Miquel Lionel <lionelmiquel@sfr.fr> | 2020-11-22 19:44:53 +0100 |
|---|---|---|
| committer | Miquel Lionel <lionelmiquel@sfr.fr> | 2020-11-22 19:44:53 +0100 |
| commit | 0af1bd15684aae5cde2f027d07a7138b14174581 (patch) | |
| tree | 9cb0359511dc780a95e9dd4cf6b166f0605e4f9e /gpigeon-template.cgi | |
| parent | ad6ac494b3be85b23f22eadb86b0e98b8003be14 (diff) | |
| download | gpigeon-0af1bd15684aae5cde2f027d07a7138b14174581.tar.gz gpigeon-0af1bd15684aae5cde2f027d07a7138b14174581.zip | |
syntax error in HAS_MAILSERVER=1 check
Diffstat (limited to 'gpigeon-template.cgi')
| -rwxr-xr-x | gpigeon-template.cgi | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gpigeon-template.cgi b/gpigeon-template.cgi index 59d676b..a3dd750 100755 --- a/gpigeon-template.cgi +++ b/gpigeon-template.cgi @@ -161,10 +161,10 @@ if ( sha256_hex($PASSWD) eq $PASSWD_HASH and $ENV{'REQUEST_METHOD'} eq 'POST'){ if ($HAS_MAILSERVER){ undef $mymailaddr_escaped; print $gpg_form_fh "\n", - ' use Mail::Sendmail;', - ' %mail = ( To => \''.$mymailaddr.'\',' , "\n", - ' From => \''.$mymailaddr.'\',', "\n", - ' Subject => \'Gpigeon\' ', "\n", + ' use Mail::Sendmail;', "\n", + ' my %mail = ( To => \''.$mymailaddr.'\', ', "\n", + ' From => \''.$mymailaddr.'\', ', "\n", + ' Subject => \'Gpigeon\', ', "\n", ' Message => "$enc_msg\n" ', "\n", ' );', "\n", ' sendmail(%mail) or die $Mail::Sendmail::error;', "\n"; |