Revision 452f0d6a
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
SL/Controller/Order.pm | ||
---|---|---|
8 | 8 |
use SL::Presenter::Tag qw(select_tag hidden_tag div_tag); |
9 | 9 |
use SL::Locale::String qw(t8); |
10 | 10 |
use SL::SessionFile::Random; |
11 |
use SL::IMAPClient; |
|
11 | 12 |
use SL::PriceSource; |
12 | 13 |
use SL::Webdav; |
13 | 14 |
use SL::File; |
... | ... | |
2190 | 2191 |
$self->order->add_phone_notes($phone_note) if $is_new; |
2191 | 2192 |
} |
2192 | 2193 |
|
2194 |
my $is_new = !$self->order->id; |
|
2193 | 2195 |
$db->with_transaction(sub { |
2194 | 2196 |
my $validity_token; |
2195 | 2197 |
if (!$self->order->id) { |
... | ... | |
2269 | 2271 |
1; |
2270 | 2272 |
}) || push(@{$errors}, $db->error); |
2271 | 2273 |
|
2274 |
if ($is_new && $self->order->is_sales) { |
|
2275 |
my $imap_client = SL::Mail::IMAP::Client->new(); |
|
2276 |
if ($imap_client) { |
|
2277 |
$imap_client->create_folder_for_record($self->order); |
|
2278 |
} |
|
2279 |
} |
|
2280 |
|
|
2281 |
|
|
2272 | 2282 |
return $errors; |
2273 | 2283 |
} |
2274 | 2284 |
|
Auch abrufbar als: Unified diff
Order: Erstelle Emailordner für neue VK-Angebote und VK-Aufträge