diff --git a/src/xschem.tcl b/src/xschem.tcl
index a0e22f86..8a0447b6 100644
--- a/src/xschem.tcl
+++ b/src/xschem.tcl
@@ -2152,7 +2152,7 @@ proc graph_add_nodes {} {
     }
   }
   if {$change_done && $graph_bus} {
-    set sel "BUS_NAME,${sel}\n"
+    set sel "BUS_NAME;${sel}\n"
   } else {
     set sel "${sel}\n"
   }