From 7a101ca903c44be10a692e7264b3160115edf7cf Mon Sep 17 00:00:00 2001
From: TheMarkitecht <Mark@TheMarkitecht.com>
Date: Tue, 4 Feb 2020 20:14:42 -0600
Subject: Fix #148 - oo errors with no class variables.

https://github.com/msteveb/jimtcl/issues/148
---
 oo.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'oo.tcl')

diff --git a/oo.tcl b/oo.tcl
index b6ad4a9..c31c481 100644
--- a/oo.tcl
+++ b/oo.tcl
@@ -69,7 +69,7 @@ proc class {classname {baseclasses {}} classvars} {
 			# Note that we can't use 'dict with' here because
 			# the dict isn't updated until the body completes.
 			foreach __ [$self vars] {upvar 1 instvars($__) $__}
-			unset __
+			unset -nocomplain __
 			eval $__body
 		}
 	}
-- 
cgit v1.1