From b1d40e6d1275b1f7d0feb75a8212cbdc35db9cb0 Mon Sep 17 00:00:00 2001
From: Tim Edwards <tim@opencircuitdesign.com>
Date: Sat, 15 Jun 2019 12:29:08 -0400
Subject: [PATCH] Corrected an error in the "permute forget" Tcl command option
 that would attempt to access uninitialized variables, possibly causing a
 crash.

---
 tcltk/tclnetgen.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tcltk/tclnetgen.c b/tcltk/tclnetgen.c
index 14cdd2c..faeba22 100644
--- a/tcltk/tclnetgen.c
+++ b/tcltk/tclnetgen.c
@@ -3811,8 +3811,8 @@ _netcmp_permute(ClientData clientData,
 	       if (PermuteForget(tp->name, fnum, NULL, NULL))
 	          Fprintf(stdout, "No permutations on circuit %s\n", tp->name);
 	       else
-	          Fprintf(stderr, "Unable to reset model %s pin permutation %s, %s.\n",
-			tp->name, pin1, pin2);
+	          Fprintf(stderr, "Unable to reset model %s pin permutations.\n",
+			tp->name);
 	    }
 	    return TCL_OK;
 	 }