summaryrefslogtreecommitdiff
path: root/ext/DB_File
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:12:30 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-30 23:12:30 +0000
commitb7953727b0415d171133ea7caa7aca5672129f99 (patch)
tree04eeafc77fc5ed0662e0e330e4960ab6b6402acc /ext/DB_File
parent659ca9ea8f57ee52a52802839584b7208ad161b7 (diff)
downloadperl-b7953727b0415d171133ea7caa7aca5672129f99.tar.gz
More -Wall silencing from Michael Schwern and Jarkko Hietaniemi.
p4raw-id: //depot/perl@10335
Diffstat (limited to 'ext/DB_File')
-rw-r--r--ext/DB_File/DB_File.xs3
1 files changed, 1 insertions, 2 deletions
diff --git a/ext/DB_File/DB_File.xs b/ext/DB_File/DB_File.xs
index 74cbd1b7cc..f84f55069c 100644
--- a/ext/DB_File/DB_File.xs
+++ b/ext/DB_File/DB_File.xs
@@ -1768,7 +1768,6 @@ unshift(db, ...)
DBT value ;
int i ;
int One ;
- DB * Db = db->dbp ;
STRLEN n_a;
DBT_clear(key) ;
@@ -1791,7 +1790,7 @@ unshift(db, ...)
#ifdef DB_VERSION_MAJOR
RETVAL = (db->cursor->c_put)(db->cursor, &key, &value, DB_BEFORE) ;
#else
- RETVAL = (Db->put)(Db, &key, &value, R_IBEFORE) ;
+ RETVAL = (db->dbp->put)(db->dbp, &key, &value, R_IBEFORE) ;
#endif
if (RETVAL != 0)
break;