From 9c79bbb15de9cc9867ac17f62427e86a53f7f84d Mon Sep 17 00:00:00 2001
From: Warren Toomey <wkt@tuhs.org>
Date: Wed, 2 Mar 2016 20:42:45 +1000
Subject: [PATCH] Oops, didn't initialise $mode properly.

---
 tools/a7out | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tools/a7out b/tools/a7out
index bffc174..dcb628e 100755
--- a/tools/a7out
+++ b/tools/a7out
@@ -736,7 +736,7 @@ sub sys_chmod {
     #   02 read for non-owner
     #   04 write for owner
     #   10 read for owner
-    my $mode;
+    my $mode=0;
     $mode|= 0002 if ($AC & 01);
     $mode|= 0004 if ($AC & 02);
     $mode|= 0220 if ($AC & 04);