From 21658ed182363d811d82f96be46770608c38aafe Mon Sep 17 00:00:00 2001
From: James Cherry <cherry@parallaxsw.com>
Date: Sat, 1 Jun 2019 18:41:09 -0700
Subject: [PATCH] again

---
 tcl/Cmds.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tcl/Cmds.tcl b/tcl/Cmds.tcl
index 2948b6b1..34fdc600 100644
--- a/tcl/Cmds.tcl
+++ b/tcl/Cmds.tcl
@@ -1472,7 +1472,7 @@ proc get_instance_error { arg_name arg } {
   } elseif { [is_object $arg] } {
     set object_type [object_type $arg]
     if { $object_type == "Instance" } {
-      lappend insts $arg
+      set inst $arg
     } else {
       sta_error "$arg_name type '$object_type' is not an instance."
     }