From 3fbb4389df3ddeecd4fcd645591a3d90a47de373 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Mon, 22 Nov 1999 01:56:47 +0000 Subject: no_comment --- perl-install/resize_fat/directory.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/resize_fat/directory.pm') diff --git a/perl-install/resize_fat/directory.pm b/perl-install/resize_fat/directory.pm index 22d2a1fae..cdce4be88 100644 --- a/perl-install/resize_fat/directory.pm +++ b/perl-install/resize_fat/directory.pm @@ -67,7 +67,7 @@ sub traverse_all($$) { resize_fat::io::read_file($fs, $fs->{fat32_root_dir_cluster}) : resize_fat::io::read($fs, $fs->{root_dir_offset}, $fs->{root_dir_size}); traverse($directory, $traverse_all); - $traverse_all = undef; #- circular reference is no good for perl's poor GC :( + undef $traverse_all; #- circular reference is no good for perl's poor GC :( } -- cgit v1.2.1