Revision c825bf71
Von Moritz Bunkus vor mehr als 9 Jahren hinzugefügt
scripts/rose_auto_create_model.pl | ||
---|---|---|
148 | 148 |
|
149 | 149 |
eval <<CODE; |
150 | 150 |
package SL::DB::AUTO::$package; |
151 |
use SL::DB::Object; |
|
152 |
use base qw(SL::DB::Object); |
|
151 |
use parent qw(SL::DB::Object); |
|
153 | 152 |
|
154 | 153 |
__PACKAGE__->meta->table('$table'); |
155 | 154 |
$schema_str |
... | ... | |
208 | 207 |
} |
209 | 208 |
|
210 | 209 |
$definition =~ s/(meta->table.*)\n/$1\n$schema_str/m if $schema; |
210 |
$definition =~ s{^use base}{use parent}m; |
|
211 | 211 |
|
212 | 212 |
my $full_definition = <<CODE; |
213 | 213 |
# This file has been auto-generated. Do not modify it; it will be overwritten |
... | ... | |
274 | 274 |
|
275 | 275 |
use strict; |
276 | 276 |
|
277 |
use SL::DB::Helper::Manager; |
|
278 |
use base qw(SL::DB::Helper::Manager); |
|
277 |
use parent qw(SL::DB::Helper::Manager); |
|
279 | 278 |
|
280 | 279 |
sub object_class { 'SL::DB::${package}' } |
281 | 280 |
|
Auch abrufbar als: Unified diff
Rose-Model-Creation: use parent anstelle von use base nutzen
Momentan benutzt die kivitendo-Codebasis beides zu ähnlich großen
Teilen. Allerdings sagt allein schon die Dokumentation zu base(3perl),
dass eigentlich immer das leichtgewichtigere parent(3perl) zu bevorzugen
ist.