|
Lines 60-72
sub new {
Link Here
|
| 60 |
return; |
60 |
return; |
| 61 |
} |
61 |
} |
| 62 |
if ( !$self->{recipient} ) { |
62 |
if ( !$self->{recipient} ) { |
| 63 |
carp |
63 |
carp "No vendor passed to order creation: basket = " . $self->{basket}->basketno(); |
| 64 |
"No vendor passed to order creation: basket = $self->{basket}->basketno()"; |
|
|
| 65 |
return; |
64 |
return; |
| 66 |
} |
65 |
} |
| 67 |
if ( !$self->{sender} ) { |
66 |
if ( !$self->{sender} ) { |
| 68 |
carp |
67 |
carp "No sender ean passed to order creation: basket = " . $self->{basket}->basketno(); |
| 69 |
"No sender ean passed to order creation: basket = $self->{basket}->basketno()"; |
|
|
| 70 |
return; |
68 |
return; |
| 71 |
} |
69 |
} |
| 72 |
|
70 |
|
| 73 |
- |
|
|