Changeset 242 for trunk/lib/Epoll/DB/Choice.pm
- Timestamp:
- 06/13/09 15:27:17 (15 years ago)
- Location:
- trunk/lib/Epoll
- Files:
-
- 1 edited
- 1 copied
Legend:
- Unmodified
- Added
- Removed
-
trunk/lib/Epoll/DB/Choice.pm
r165 r242 1 package Vote::DB::Choice;1 package Epoll::DB::Choice; 2 2 3 3 # $Id$ … … 5 5 use strict; 6 6 use warnings; 7 use base ' Vote::DB::common';8 use Vote::DB::Poll;7 use base 'Epoll::DB::common'; 8 use Epoll::DB::Poll; 9 9 10 10 =head1 NAME 11 11 12 Vote::Model::Vote- Catalyst Model12 Epoll::Model::Epoll - Catalyst Model 13 13 14 14 =head1 DESCRIPTION … … 24 24 key => $key, 25 25 dbstring => $dbstring, 26 db => Vote::DB::common::_newdb($dbstring),26 db => Epoll::DB::common::_newdb($dbstring), 27 27 }, $class; 28 28 } … … 32 32 sub poll { 33 33 my ($self) = @_; 34 Vote::DB::Poll->new($self->{dbstring}, $self->info->{poll});34 Epoll::DB::Poll->new($self->{dbstring}, $self->info->{poll}); 35 35 } 36 36
Note: See TracChangeset
for help on using the changeset viewer.