[Zope3-checkins] CVS: ZODB4/ZODB - FileStorage.py:1.110.6.3

[Jeremy Hylton]

Update of /cvs-repository/ZODB4/ZODB
In directory cvs.zope.org:/tmp/cvs-serv24650

Modified Files:
      Tag: ZODB4-Q-branch
	FileStorage.py 
Log Message:
Iterator must account for size of version info.


=== ZODB4/ZODB/FileStorage.py 1.110.6.2 => 1.110.6.3 ===
--- ZODB4/ZODB/FileStorage.py:1.110.6.2	Tue Dec 10 17:04:30 2002
+++ ZODB4/ZODB/FileStorage.py	Tue Dec 10 17:14:40 2002
@@ -2339,6 +2339,8 @@
             # Read the data records for this transaction
             h = self._read_data_header(pos)
             dlen = DATA_HDR_LEN + (h.plen or 8)
+            if h.version:
+                dlen += 16 + h.vlen
             if pos + dlen > self._tend or h.tloc != self._tpos:
                 warn("%s data record exceeds transaction record at %s",
                      file.name, pos)