Changeset 320
- Timestamp:
- 06/01/10 11:03:09 (14 years ago)
- Location:
- trunk/t
- Files:
-
- 1 deleted
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/t/11Epoll_DB_crypted.t
r309 r320 1 1 use strict; 2 2 use warnings; 3 use Test::More tests => 1 3;3 use Test::More tests => 14; 4 4 5 5 # $Id$ … … 23 23 $poll->register_ballot('c', [], 'localhost'); 24 24 25 26 ok($poll->decrypted_ballots('keypass'), "Can decrypt ballot"); 27 ok($poll->compute_results, "Can compute results"); 25 28 isa_ok(my $results = $vote->results($pollid), 'Epoll::DB::Poll'); 26 27 ok($results->decrypted_ballots('keypass'), "Can decrypt ballot");28 29 29 30 is($results->ballot_count_crypt, 3, "ballot count is 3");
Note: See TracChangeset
for help on using the changeset viewer.