projects
/
idzebra-moved-to-github.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
8645ef6
)
Fixed logging in record_update test
author
pop
<pop>
Tue, 15 Apr 2003 20:56:33 +0000
(20:56 +0000)
committer
pop
<pop>
Tue, 15 Apr 2003 20:56:33 +0000
(20:56 +0000)
perl/t/03_record_update.t
patch
|
blob
|
history
diff --git
a/perl/t/03_record_update.t
b/perl/t/03_record_update.t
index
d390be5
..
e34e844
100644
(file)
--- a/
perl/t/03_record_update.t
+++ b/
perl/t/03_record_update.t
@@
-1,6
+1,6
@@
#!perl
# =============================================================================
#!perl
# =============================================================================
-# $Id: 03_record_update.t,v 1.4 2003-04-15 20:55:14 pop Exp $
+# $Id: 03_record_update.t,v 1.5 2003-04-15 20:56:33 pop Exp $
#
# Perl API header
# =============================================================================
#
# Perl API header
# =============================================================================
@@
-20,7
+20,7
@@
use Test::More tests => 17;
# Session opening and closing
BEGIN {
use_ok('IDZebra');
# Session opening and closing
BEGIN {
use_ok('IDZebra');
-# IDZebra::logFile("test.log");
+ IDZebra::logFile("test.log");
use_ok('IDZebra::Session');
use_ok('pod');
}
use_ok('IDZebra::Session');
use_ok('pod');
}
@@
-39,8
+39,6
@@
my $rec1=`cat lib/IDZebra/Data1.pm`;
my $rec2=`cat lib/IDZebra/Filter.pm`;
my $rec3=`cat lib/IDZebra/Session.pm`;
my $rec2=`cat lib/IDZebra/Filter.pm`;
my $rec3=`cat lib/IDZebra/Session.pm`;
-# IDZebra::logLevel(15);
-
my ($sysno, $stat);
$sess->begin_trans;
my ($sysno, $stat);
$sess->begin_trans;