From: Chris W. <la...@us...> - 2004-10-24 16:40:17
|
Update of /cvsroot/openinteract/OpenInteract2/extra_packages/delicious_tags/OpenInteract2/SQLInstall In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18386/delicious_tags/OpenInteract2/SQLInstall Added Files: DeliciousTags.pm Log Message: intial import of delicious_tags package --- NEW FILE: DeliciousTags.pm --- package OpenInteract2::SQLInstall::DeliciousTags; # $Id: DeliciousTags.pm,v 1.1 2004/10/24 16:40:08 lachoy Exp $ use strict; use base qw( OpenInteract2::SQLInstall ); my %FILES = ( sequence => 'delicious_tags_sequence.sql', default => 'delicious_tags.sql', ); sub get_structure_set { return 'delicious_tags'; } sub get_structure_file { my ( $self, $set, $type ) = @_; if ( $type =~ /^(Pg|Oracle)$/ ) { return [ $FILES{sequence}, $FILES{default} ]; } return [ $FILES{default} ]; } 1; |