Revision f844f1e2
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| SL/LXDebug.pm | ||
|---|---|---|
| 213 | 213 |
$self->message($level, $prefix . sprintf('(%d row%s)', scalar @{ $results }, scalar @{ $results } > 1 ? 's' : ''));
|
| 214 | 214 |
} |
| 215 | 215 |
|
| 216 |
sub dump_object {
|
|
| 217 |
my ($self, $level, $text, $object) = @_; |
|
| 218 |
|
|
| 219 |
my $copy; |
|
| 220 |
if ($object) {
|
|
| 221 |
$copy->{$_} = $object->$_ for $object->meta->columns;
|
|
| 222 |
} |
|
| 223 |
|
|
| 224 |
$self->dump($level, $text, $copy); |
|
| 225 |
} |
|
| 226 |
|
|
| 216 | 227 |
sub show_diff {
|
| 217 | 228 |
my ($self, $level, $item1, $item2, %params) = @_; |
| 218 | 229 |
|
Auch abrufbar als: Unified diff
LXDebug::dump_object zum Dumpen von den Spalten von RDBO-Instanzen
Dumpt keine Datenbankhandle, keine Relationships