--- nfo/perl/libs/Data/Storage/Handler/Abstract.pm	2002/12/01 22:19:33	1.5
+++ nfo/perl/libs/Data/Storage/Handler/Abstract.pm	2002/12/03 15:52:24	1.6
@@ -1,8 +1,11 @@
 #################################
 #
-#  $Id: Abstract.pm,v 1.5 2002/12/01 22:19:33 joko Exp $
+#  $Id: Abstract.pm,v 1.6 2002/12/03 15:52:24 joko Exp $
 #
 #  $Log: Abstract.pm,v $
+#  Revision 1.6  2002/12/03 15:52:24  joko
+#  + fix/feature: if dispatching to deep core method fails (is not declared), try method at Data::Storage - level
+#
 #  Revision 1.5  2002/12/01 22:19:33  joko
 #  + just disconnect if COREHANDLE exists
 #
@@ -123,6 +126,9 @@
     
     # method calls doing it until here will get dispatched to the proper handler
     return $self->{COREHANDLE}->$methodname(@_);
+  
+  } elsif ($self->can($methodname)) {
+    return $self->$methodname(@_);
   }
 
 }