--- nfo/perl/libs/Data/Storage/Handler/Abstract.pm	2003/01/30 21:46:32	1.12
+++ nfo/perl/libs/Data/Storage/Handler/Abstract.pm	2003/01/30 22:27:05	1.13
@@ -1,7 +1,10 @@
 ##    ------------------------------------------------------------------------
-##    $Id: Abstract.pm,v 1.12 2003/01/30 21:46:32 joko Exp $
+##    $Id: Abstract.pm,v 1.13 2003/01/30 22:27:05 joko Exp $
 ##    ------------------------------------------------------------------------
 ##    $Log: Abstract.pm,v $
+##    Revision 1.13  2003/01/30 22:27:05  joko
+##    + added new abstract methods
+##
 ##    Revision 1.12  2003/01/30 21:46:32  joko
 ##    + fixed behaviour of AUTOLOAD-method
 ##
@@ -426,4 +429,28 @@
     return;
   }
 
+  sub getDbName {
+    my $self = shift;
+    $self->_abstract_function('getDbName');
+    return;
+  }
+
+  sub testAvailability {
+    my $self = shift;
+    $self->_abstract_function('testAvailability');
+    return;
+  }
+
+  sub isConnected {
+    my $self = shift;
+    $self->_abstract_function('isConnected');
+    return;
+  }
+
+  sub testDsn {
+    my $self = shift;
+    $self->_abstract_function('testDsn');
+    return;
+  }
+
 1;