Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision faea2c48

Von Jan Büren vor mehr als 9 Jahren hinzugefügt

  • ID faea2c48e131611c827519cd0939dac3e43aada6
  • Vorgänger fb902c0a
  • Nachfolger 978a03de

Changelog für 3.2.x Brieffunktion erweitert

Brief: Immer erst speichern, bevor man ausdruckt / mailt

Klare Benutzerführung. Ist notwendig, wenn man die WebDAV-Archivierung
konsistent haben will (da hier letternumber benötigt wird).

Erweiterung Common.pm um Briefarchivierung in WebDAV

Besseres Debbugging in copy_file_to_webdav und neuen
Dokumententyp in get_webdav_folder (welche hässlich ist)

Anpassungen für Brief in io.pl für E-Mail-Versand

... alles so gelassen wie es war, bloss nichts kaputt machen und mit
minimalen fußabdrücken wieder raus aus diesem teil der stadt ...

Erweiterung Brieffunktion um WebDAV-Archivierung

Unterschiede anzeigen:

SL/Common.pm
583 583
    ($path, $number) = ("einkaufslieferscheine", $form->{donumber});
584 584
  } elsif ($form->{type} eq "credit_note") {
585 585
    ($path, $number) = ("gutschriften", $form->{invnumber});
586
  } elsif ($form->{type} eq "letter") {
587
    ($path, $number) = ("briefe", $form->{letternumber} );
586 588
  } elsif ($form->{vc} eq "customer") {
587 589
    ($path, $number) = ("rechnungen", $form->{invnumber});
588 590
  } elsif ($form->{vc} eq "vendor") {
......
610 612
  # checks
611 613
  foreach my $item (qw(tmpdir tmpfile type)){
612 614
    next if $form->{$item};
613
    $::lxdebug->message(LXDebug::WARN(), 'Missing parameter');
615
    $::lxdebug->message(LXDebug::WARN(), 'Missing parameter:' . $item);
614 616
    $::form->error($::locale->text("Missing parameter for WebDAV file copy"));
615 617
  }
616 618

  
......
618 620

  
619 621
  if (! $webdav_folder){
620 622
    $::lxdebug->leave_sub();
623
    $::lxdebug->message(LXDebug::WARN(), 'Cannot check correct WebDAV folder');
621 624
    $::form->error($::locale->text("Cannot check correct WebDAV folder"));
622 625
    return undef;
623 626
  }
......
626 629

  
627 630
  # maybe the path does not exist (automatic printing), see #2446
628 631
  if (!-d $complete_path) {
629
    # we need a chdir and  restore old dir
632
    # we need a chdir and restore old dir
630 633
    my $current_dir = POSIX::getcwd();
631 634
    chdir("$form->{cwd}");
632 635
    mkdir_with_parents($webdav_folder);

Auch abrufbar als: Unified diff