From 9d3ab440d29976fd18a51e5873332c7867264fe7 Mon Sep 17 00:00:00 2001
From: Slaven Rezic <slaven@rezic.de>
Date: Fri, 30 Apr 2010 17:07:23 +0200
Subject: [PATCH] * fix in package_size: should use $fsize instead of $opsize

---
 lib/B/TerseSize.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/lib/B/TerseSize.pm b/lib/B/TerseSize.pm
index 076b97f..444ea94 100644
--- a/lib/B/TerseSize.pm
+++ b/lib/B/TerseSize.pm
@@ -125,7 +125,7 @@ sub package_size {
 
         for (keys %{ $filelex{$package} }) {
             my $fsize = $filelex{$package}->{$_};
-            $total_opsize += $opsize;
+            $total_opsize += $fsize;
             $retval{"my ${_} = ...;"} = 
               {'size' => $fsize};
         }
-- 
1.7.0.3