projekt kivitendo

  $main::lxdebug->enter_sub();

  my ($self, $myconfig, $userspath) = @_;

  $self->{"cwd"} = getcwd();

  $self->{"tmpdir"} = $self->{cwd} . "/${userspath}";

  # for postscript we store a copy in a temporary file

  my $fileid = time;

  $self->{tmpfile} ||= "$userspath/${fileid}.$self->{IN}";

  if ($template->uses_temp_file() || $self->{media} eq 'email') {

    $out = $self->{OUT};

    $self->{OUT} = ">$self->{tmpfile}";

      }

      $self->error($self->cleanup . "$err") if ($err);

    } else {

sub send {

  $main::lxdebug->enter_sub();

  my $boundary = time;

  $boundary = "LxOffice-$self->{version}-$boundary";

  $self->{charset} = Common::DEFAULT_CHARSET unless $self->{charset};

  }

  $self->{contenttype} = "text/plain" unless $self->{contenttype};

    $form->{subject} = qq|$form->{label} $form->{"${inv}number"}|

      unless $form->{subject};

    $form->{emailed} .= " $form->{formname}";

    $form->{emailed} =~ s/^ //;

  }