Revision 2f5913b1
Von Jan Büren vor mehr als 1 Jahr hinzugefügt
README.md | ||
---|---|---|
7 | 7 |
Das ist aber eher in der Verantwortung der aufrufenden Routine, damit das besser abgegrenzt ist: |
8 | 8 |
|
9 | 9 |
|
10 |
@@ -56,9 +57,6 @@ sub _email_user { |
|
10 |
```@@ -56,9 +57,6 @@ sub _email_user {
|
|
11 | 11 |
sub send_email { |
12 | 12 |
my ($self) = @_; |
13 | 13 |
|
14 |
- my @ids = @{$self->{job_obj}->data_as_hash->{ids}}; |
|
15 |
- return unless (scalar @ids && $self->{config} && $self->{config}->{send_email_to}); |
|
16 |
- |
|
14 |
- my @ids = @{$self->{job_obj}->data_as_hash->{ids}};
|
|
15 |
- return unless (scalar @ids && $self->{config} && $self->{config}->{send_email_to});
|
|
16 |
-
|
|
17 | 17 |
my $user = $self->_email_user; |
18 | 18 |
my $email = $self->{job_obj}->data_as_hash->{mail_to} ? $self->{job_obj}->data_as_hash->{mail_to} |
19 | 19 |
: $user ? $user->get_config_value('email') |
20 |
@@ -140,13 +138,15 @@ sub run { |
|
20 |
@@ -140,13 +138,15 @@ sub run {
|
|
21 | 21 |
|
22 | 22 |
$self->check_below_minimum_stock(); |
23 | 23 |
|
24 |
- $self->send_email(); |
|
25 |
- |
|
26 |
my $data = $job_obj->data_as_hash; |
|
27 |
- die $data->{errors} if $data->{errors}; |
|
28 |
+ # errors indicate we have to inform the user |
|
29 |
+ if ($data->{errors}) { |
|
30 |
+ $self->send_email(); |
|
31 |
+ die $data->{errors} if $data->{errors}; |
|
32 |
+ } |
|
33 |
|
|
34 |
|
|
35 |
2) Die Routine send_email springt raus, falls sich in der kivitendo.conf kein mit einer gültigen E-Mail-Adresse befindet. |
|
24 |
- $self->send_email(); |
|
25 |
- |
|
26 |
my $data = $job_obj->data_as_hash; |
|
27 |
- die $data->{errors} if $data->{errors}; |
|
28 |
+ # errors indicate we have to inform the user |
|
29 |
+ if ($data->{errors}) { |
|
30 |
+ $self->send_email(); |
|
31 |
+ die $data->{errors} if $data->{errors}; |
|
32 |
+ } |
|
33 |
``` |
|
34 |
|
|
35 |
|
|
36 |
2) Die Routine send_email springt raus, falls sich in der kivitendo.conf kein mit einer gültigen E-Mail-Adresse befindet. |
|
36 | 37 |
Das ist für den kivi-Admin schwierig zu konfigurieren und für Admins die nur an der Oberfläche administrieren überhaupt einstellbar |
37 | 38 |
Ferner wird ja im weiteren Verlauf auf andere Mail-Adressen geprüft und _email_user ist ja auch schon ausgelagert. |
38 | 39 |
|
39 | 40 |
2.1) Prüfung auf valide Konfig in methode |
40 |
sub _email_user { |
|
41 |
my ($self) = @_; |
|
42 |
+ return unless ($self->{config} && $self->{config}->{send_email_to}); |
|
43 |
$self->{email_user} ||= SL::DB::Manager::AuthUser->find_by(login => $self->{config}->{send_email_to}); |
|
44 |
} |
|
45 |
|
|
41 |
|
|
42 |
```sub _email_user { |
|
43 |
my ($self) = @_; |
|
44 |
+ return unless ($self->{config} && $self->{config}->{send_email_to}); |
|
45 |
$self->{email_user} ||= SL::DB::Manager::AuthUser->find_by(login => $self->{config}->{send_email_to}); |
|
46 |
} |
|
47 |
``` |
|
46 | 48 |
2.2) Nicht zu früh bei send_email abbrechen: |
47 | 49 |
|
48 |
sub send_email { |
|
50 |
```sub send_email {
|
|
49 | 51 |
my ($self) = @_; |
50 | 52 |
|
51 |
- my @ids = @{$self->{job_obj}->data_as_hash->{ids}}; |
|
52 |
- return unless (scalar @ids && $self->{config} && $self->{config}->{send_email_to}); |
|
53 |
|
|
53 |
- my @ids = @{$self->{job_obj}->data_as_hash->{ids}};
|
|
54 |
- return unless (scalar @ids && $self->{config} && $self->{config}->{send_email_to});
|
|
55 |
``` |
|
54 | 56 |
|
55 |
3.) Kosmetik |
|
56 |
- return ; |
|
57 |
+ return; |
|
57 |
3.) Kosmetik
|
|
58 |
- return ;
|
|
59 |
+ return;
|
|
58 | 60 |
|
59 | 61 |
|
60 | 62 |
|
Auch abrufbar als: Unified diff
Update README.md