From a10b2ecc42e730e244a6e45cf5050cb7266339a9 Mon Sep 17 00:00:00 2001
From: David du Colombier <0intro@gmail.com>
Date: Wed, 31 Jul 1996 00:00:00 +0000
Subject: [PATCH] Plan 9 from Bell Labs 1996-07-31

---
 port/qio.c | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/port/qio.c b/port/qio.c
index a5f33f9dc2521b4505679e396217ac236a6f8366..7092e456efb01d6108e29e08a148ec8ae68022eb 100644
--- a/port/qio.c
+++ b/port/qio.c
@@ -167,7 +167,7 @@ allocb(int size)
 	return b;
 }
 
-ulong bpadoverhead;
+ulong padblockoverhead;
 
 /*
  *  pad a block to the front (or the back if size is negative)
@@ -179,17 +179,20 @@ padblock(Block *bp, int size)
 	Block *nbp;
 
 	if(size >= 0){
-		if(bp->rp - bp->base >= size)
+		if(bp->rp - bp->base >= size){
+			bp->rp -= size;
 			return bp;
+		}
 
 		n = bp->wp - bp->rp;
-		bpadoverhead += n;
+		padblockoverhead += n;
 		nbp = allocb(size+n);
 		nbp->rp += size;
 		nbp->wp = nbp->rp;
 		memmove(nbp->wp, bp->rp, n);
 		nbp->wp += n;
 		freeb(bp);
+		nbp->rp -= size;
 	} else {
 		size = -size;
 
@@ -197,7 +200,7 @@ padblock(Block *bp, int size)
 			return bp;
 
 		n = bp->wp - bp->rp;
-		bpadoverhead += n;
+		padblockoverhead += n;
 		nbp = allocb(size+n);
 		memmove(nbp->wp, bp->rp, n);
 		nbp->wp += n;