1 |
198 |
ahitrov |
package webshop::Init; |
2 |
|
|
|
3 |
|
|
use strict; |
4 |
|
|
use warnings 'all'; |
5 |
|
|
|
6 |
|
|
use Contenido::Globals; |
7 |
|
|
use webshop::Apache; |
8 |
|
|
use webshop::Keeper; |
9 |
|
|
|
10 |
|
|
|
11 |
|
|
# загрузка всех необходимых плагину классов |
12 |
|
|
# webshop::SQL::SomeTable |
13 |
|
|
# webshop::SomeClass |
14 |
|
|
Contenido::Init::load_classes(qw( |
15 |
727 |
ahitrov |
webshop::SQL::AddressTable |
16 |
198 |
ahitrov |
webshop::SQL::Basket |
17 |
727 |
ahitrov |
webshop::SQL::DeliveryTable |
18 |
198 |
ahitrov |
webshop::SQL::Order |
19 |
270 |
ahitrov |
webshop::SQL::CouponsTable |
20 |
|
|
webshop::SQL::CouponLinkTable |
21 |
198 |
ahitrov |
|
22 |
509 |
ahitrov |
webshop::Profile |
23 |
|
|
|
24 |
198 |
ahitrov |
webshop::Address |
25 |
|
|
webshop::Basket |
26 |
|
|
webshop::Order |
27 |
|
|
webshop::Delivery |
28 |
413 |
ahitrov |
webshop::Payment |
29 |
270 |
ahitrov |
webshop::Coupon |
30 |
424 |
ahitrov |
webshop::Discount |
31 |
198 |
ahitrov |
|
32 |
259 |
ahitrov |
webshop::Country |
33 |
|
|
webshop::Area |
34 |
|
|
webshop::Town |
35 |
|
|
|
36 |
198 |
ahitrov |
webshop::DeliverySection |
37 |
413 |
ahitrov |
webshop::PaymentSection |
38 |
259 |
ahitrov |
webshop::RegionSection |
39 |
270 |
ahitrov |
|
40 |
|
|
webshop::CouponItemLink |
41 |
424 |
ahitrov |
webshop::DiscountItemLink |
42 |
270 |
ahitrov |
webshop::OrderCouponLink |
43 |
198 |
ahitrov |
)); |
44 |
|
|
|
45 |
|
|
sub init { |
46 |
509 |
ahitrov |
push @{ $state->{'available_documents'} }, qw(webshop::Basket webshop::Order webshop::Delivery webshop::Payment webshop::Coupon webshop::Discount webshop::Country webshop::Area webshop::Town webshop::Profile); |
47 |
413 |
ahitrov |
push @{ $state->{'available_sections'} }, qw(webshop::DeliverySection webshop::PaymentSection webshop::RegionSection); |
48 |
270 |
ahitrov |
push @{ $state->{'available_links'} }, qw(webshop::CouponItemLink webshop::OrderCouponLink); |
49 |
198 |
ahitrov |
0; |
50 |
|
|
} |
51 |
|
|
|
52 |
|
|
1; |