From f86e9689cd59d4f9947ed30b77f0bd225e851da4 Mon Sep 17 00:00:00 2001 From: nwf Date: Wed, 27 Aug 2008 02:38:47 -0400 Subject: [PATCH] Minor stylistic change in HuffmanCoder darcs-hash:20080827063847-4d648-77e850ce0e433dc8b59a8d12e2a72b04a2eea706.gz --- HuffmanCoder.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/HuffmanCoder.pm b/HuffmanCoder.pm index 1599f5c..c8936b3 100644 --- a/HuffmanCoder.pm +++ b/HuffmanCoder.pm @@ -125,6 +125,7 @@ sub _is_char($) { sub decode($$) { my ($self, $inst) = @_; + my $ccr = $$self{'ccr'}; my $result = ""; while ($inst ne "") { @@ -132,7 +133,7 @@ sub decode($$) { while (!_is_char($tbl)) { my $code = substr($inst, 0, 1); $inst = substr($inst, 1); - $tbl = _decode_char($$self{'ccr'}, $code, $tbl); + $tbl = _decode_char($ccr, $code, $tbl); } $result .= $tbl; } -- 2.50.1