summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xLedgerSMB/Form.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index c5410ab0..bb0a5ab7 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -609,7 +609,10 @@ sub parse_template {
$self->{cwd} = Cwd::getcwd();
for (qw(IN OUT)) {
- if ( $self->{$_} =~ m#[:/\\]# ) {
+ if ( $self->{$_} =~ m#[:/\\]# and
+ ($self->{$_} != $LedgerSMB::Sysconfig::sendmail and ($_ eq 'OUT')))
+ {
+
$self->error("Access denied");
}
}