← Back to branch summary

~ubuntu-branches/ubuntu/maverick/ciphersaber/maverick

« back to all changes in this revision

Viewing changes to t/create.t

  • Committer: Bazaar Package Importer
  • Author(s): Jerome Marant
  • Date: 2002-03-27 07:23:42 UTC
  • Revision ID: james.westby@ubuntu.com-20020327072342-zcvplihmsszct2ok
Tags: upstream-0.60
Import upstream version 0.60

Show diffs side-by-side

added added

removed removed

Lines of Context:
t/create.t
 
1
use Crypt::CipherSaber;
 
2
 
 
3
print "1..1\n";
 
4
 
 
5
# first, try to create an object
 
6
my $cs = Crypt::CipherSaber->new('first key') or die "not ok 2";
 
7
if (defined($cs)) {
 
8
        print "ok 1\n";
 
9
} else {
 
10
        print "not ok 1\n";
 
11
}