| 3 |
# $Id$ |
# $Id$ |
| 4 |
# |
# |
| 5 |
# $Log$ |
# $Log$ |
| 6 |
|
# Revision 1.6 2002/12/03 15:52:24 joko |
| 7 |
|
# + fix/feature: if dispatching to deep core method fails (is not declared), try method at Data::Storage - level |
| 8 |
|
# |
| 9 |
# Revision 1.5 2002/12/01 22:19:33 joko |
# Revision 1.5 2002/12/01 22:19:33 joko |
| 10 |
# + just disconnect if COREHANDLE exists |
# + just disconnect if COREHANDLE exists |
| 11 |
# |
# |
| 126 |
|
|
| 127 |
# method calls doing it until here will get dispatched to the proper handler |
# method calls doing it until here will get dispatched to the proper handler |
| 128 |
return $self->{COREHANDLE}->$methodname(@_); |
return $self->{COREHANDLE}->$methodname(@_); |
| 129 |
|
|
| 130 |
|
} elsif ($self->can($methodname)) { |
| 131 |
|
return $self->$methodname(@_); |
| 132 |
} |
} |
| 133 |
|
|
| 134 |
} |
} |
Parent Directory
| 
Revision Log
| 
Patch
