Revision cf3a8cf7
Von Sven Schöling vor mehr als 7 Jahren hinzugefügt
| SL/Dev/ALL.pm | ||
|---|---|---|
| 2 | 2 |
|
| 3 | 3 |
use strict; |
| 4 | 4 |
|
| 5 |
use Exporter; |
|
| 5 | 6 |
use SL::Dev::Part; |
| 6 | 7 |
use SL::Dev::CustomerVendor; |
| 7 | 8 |
use SL::Dev::Inventory; |
| 8 | 9 |
use SL::Dev::Record; |
| 9 | 10 |
use SL::Dev::Payment; |
| 10 | 11 |
|
| 12 |
sub import {
|
|
| 13 |
no strict "refs"; |
|
| 14 |
for (qw(Part CustomerVendor Inventory Record Payment)) {
|
|
| 15 |
Exporter::export_to_level("SL::Dev::$_", 1, @_);
|
|
| 16 |
} |
|
| 17 |
} |
|
| 18 |
|
|
| 19 |
|
|
| 11 | 20 |
1; |
| 12 | 21 |
|
| 13 | 22 |
__END__ |
Auch abrufbar als: Unified diff
SL::Dev: EXPORT rewrite und create/new split
- SL::Dev module exportieren nicht mehr ungefragt
- SL::Dev::ALL exportiert jetzt den übergebenen tag aus allen Modulen
- Funktionen nicht nicht speichern (Part/CustomerVendor) heißen jetzt
"new_X" anstatt "create_X"