/[cvs]/nfo/perl/libs/Data/Storage/Handler/Files.pm
ViewVC logotype

Diff of /nfo/perl/libs/Data/Storage/Handler/Files.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.7 by joko, Fri Jun 6 03:57:25 2003 UTC revision 1.8 by joko, Wed Jun 25 22:56:11 2003 UTC
# Line 2  Line 2 
2  ##    $Id$  ##    $Id$
3  ##    ------------------------------------------------------------------------  ##    ------------------------------------------------------------------------
4  ##    $Log$  ##    $Log$
5    ##    Revision 1.8  2003/06/25 22:56:11  joko
6    ##    dummy "sub getCOREHANDLE"
7    ##
8  ##    Revision 1.7  2003/06/06 03:57:25  joko  ##    Revision 1.7  2003/06/06 03:57:25  joko
9  ##    disabled debugging output  ##    disabled debugging output
10  ##  ##
# Line 43  my $logger = Log::Dispatch::Config->inst Line 46  my $logger = Log::Dispatch::Config->inst
46  sub getMetaInfo {  sub getMetaInfo {
47    my $self = shift;    my $self = shift;
48    $logger->debug( __PACKAGE__ . "->getMetaInfo()"  );    $logger->debug( __PACKAGE__ . "->getMetaInfo()"  );
49    return;    #return;
50    return {    return {
51      'disconnectMethod' => 'disconnect',      'disconnectMethod' => 'abc',
52    };    };
53  }  }
54    
# Line 55  sub connect { Line 58  sub connect {
58    #$self->{COREHANDLE} = 1;    #$self->{COREHANDLE} = 1;
59  }  }
60    
61    #sub disconnect { }
62    sub getCOREHANDLE { }
63    
64  sub getChildNodes {  sub getChildNodes {
65    my $self = shift;    my $self = shift;
66    #my @nodes;    #my @nodes;

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

MailToCvsAdmin">MailToCvsAdmin
ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed