From 52f0d1e6fdc4899c912a2808ecfbf1499e932e05 Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Tue, 6 Mar 2007 08:52:19 +0000
Subject: Fix a core dump caused by an error occuring while configuring
 connection item

---
 generic/Icon.c    | 1 +
 generic/Tabular.c | 1 +
 generic/Text.c    | 1 +
 generic/Track.c   | 1 +
 generic/Window.c  | 1 +
 5 files changed, 5 insertions(+)

(limited to 'generic')

diff --git a/generic/Icon.c b/generic/Icon.c
index 9c0df1c..62e32ef 100644
--- a/generic/Icon.c
+++ b/generic/Icon.c
@@ -189,6 +189,7 @@ Configure(ZnItem        item,
   old_connected = item->connected_item;
   if (ZnConfigureAttributes(item->wi, item, item, icon_attrs,
                             argc, argv, flags) == TCL_ERROR) {
+    item->connected_item = old_connected;
     return TCL_ERROR;
   }  
 
diff --git a/generic/Tabular.c b/generic/Tabular.c
index a9e8f2d..ed8e710 100644
--- a/generic/Tabular.c
+++ b/generic/Tabular.c
@@ -196,6 +196,7 @@ Configure(ZnItem        item,
   old_connected = item->connected_item;
   if (ZnConfigureAttributes(item->wi, item, item, tabular_attrs,
                             argc, argv, flags) == TCL_ERROR) {
+    item->connected_item = old_connected;
     return TCL_ERROR;
   }
   if (ISSET(*flags, ZN_ITEM_FLAG)) {
diff --git a/generic/Text.c b/generic/Text.c
index 2d820a0..5b378bc 100644
--- a/generic/Text.c
+++ b/generic/Text.c
@@ -299,6 +299,7 @@ Configure(ZnItem        item,
 
   if (ZnConfigureAttributes(item->wi, item, item, text_attrs,
                             argc, argv, flags) == TCL_ERROR) {
+    item->connected_item = old_connected;
     return TCL_ERROR;
   }
 
diff --git a/generic/Track.c b/generic/Track.c
index 86a90b0..aa6cbcf 100644
--- a/generic/Track.c
+++ b/generic/Track.c
@@ -645,6 +645,7 @@ Configure(ZnItem        item,
   old_connected = item->connected_item;
   
   if (ZnConfigureAttributes(wi, item, item, track_attrs, argc, argv, flags) == TCL_ERROR) {
+    item->connected_item = old_connected;
     return TCL_ERROR;
   }
   
diff --git a/generic/Window.c b/generic/Window.c
index eb5a68c..9dac5c7 100644
--- a/generic/Window.c
+++ b/generic/Window.c
@@ -263,6 +263,7 @@ Configure(ZnItem        item,
   old_connected = item->connected_item;
   old_win = wind->win;
   if (ZnConfigureAttributes(wi, item, item, wind_attrs, argc, argv, flags) == TCL_ERROR) {
+    item->connected_item = old_connected;
     return TCL_ERROR;
   }  
 
-- 
cgit v1.1