From d6106cfbfc9658ee433fecb1b64cee5ffa34bf6c Mon Sep 17 00:00:00 2001
From: rlar <rlar>
Date: Wed, 16 Jul 2014 20:22:26 +0200
Subject: [PATCH] subckt.c, cleanup `doit()'

---
 src/frontend/subckt.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/frontend/subckt.c b/src/frontend/subckt.c
index c172d7712..b2e59005a 100644
--- a/src/frontend/subckt.c
+++ b/src/frontend/subckt.c
@@ -491,13 +491,13 @@ doit(struct line *deck, wordlist *modnames) {
 
                 /* cut the whole .subckt ... .ends sequence from the deck chain */
 
-                line_free_x(c, FALSE);
+                line_free_x(c, FALSE); /* drop the .subckt card */
                 c = ends->li_next;
 
                 if (prev_of_c)
-                    prev_of_c->li_next = ends->li_next;
+                    prev_of_c->li_next = c;
                 else
-                    deck = ends->li_next;
+                    deck = c;
 
                 if (use_numparams == FALSE) {
                     line_free_x(ends, FALSE); /* drop the .ends card */