From a0f9b2bf0f85649c745170efa55d6125a6f9f072 Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Sun, 8 May 2016 19:20:18 +0200
Subject: [PATCH] findsubckt(), cleanup

---
 src/frontend/numparam/xpressn.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/frontend/numparam/xpressn.c b/src/frontend/numparam/xpressn.c
index 281ad6d39..abbe01a0f 100644
--- a/src/frontend/numparam/xpressn.c
+++ b/src/frontend/numparam/xpressn.c
@@ -564,7 +564,7 @@ findsubckt(dico_t *dico, const char * const s)
     while ((k_ptr >= s) && (*k_ptr > ' '))
         k_ptr--;
 
-    pscopy_up(&ustr, s + (k_ptr - s) + 1, 0, (int) (j_ptr - k_ptr));
+    pscopy_up(&ustr, k_ptr + 1, 0, (int) (j_ptr - k_ptr));
     entry = entrynb(dico, spice_dstring_value(&ustr));
 
     if (entry && (entry->tp == NUPA_SUBCKT)) {