From f5d2ae731e5bc3a6302f47de06caeb40fc3c914a Mon Sep 17 00:00:00 2001
From: zrinka <zrinka>
Date: Fri, 16 Dec 2005 18:54:36 +0000
Subject: [PATCH] split link bug

Bug found by:
Submitted by:
Requested by:
Reviewed by:
Approved by:
Obtained from:
---
 linkcfg.tcl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/linkcfg.tcl b/linkcfg.tcl
index ce3618a..81ae411 100755
--- a/linkcfg.tcl
+++ b/linkcfg.tcl
@@ -477,7 +477,7 @@ proc splitLink { link nodetype } {
     set orig_node1 [lindex $orig_nodes 0]
     set orig_node2 [lindex $orig_nodes 1]
     set new_node1 [newNode $nodetype]
-    set new_node2 [newNode $nodeSplits the link in two parts.type]
+    set new_node2 [newNode $nodetype]
     set new_link1 [newObjectId link]
     lappend link_list $new_link1
     set new_link2 [newObjectId link]
-- 
2.39.5