Add a missing line with "!" after each protocol section in final

quagga configuration.

Remove stale #nexec section from imunes.tcl

Bug found by:
Submitted by:
Requested by:
Reviewed by:
Approved by:
Obtained from:

diff --git a/exec.tcl b/exec.tcl
index 677fabb5d0da5def415d41cfd458f77f7a159855..7174bb06edd10d4ac91dd1b0455cdd464d0a1253 100755 (executable)
--- a/exec.tcl
+++ b/exec.tcl
@@ -33,10 +33,12 @@
 # and Technology through the research contract #IP-2003-143.
 #
 
+
 proc nexec { args } {
-    eval exec $args
+    exec $args
 }
 
+
 proc setOperMode { mode } {
     global oper_mode activetool nodes
     global nmbufs nmbclusters

diff --git a/imunes.tcl b/imunes.tcl
index 7d37f83e20ff5d9742edb37a14c096d4cdaa605a..b2f76b220f3c944b5b498fb0603a43d8d5eaffc8 100755 (executable)
--- a/imunes.tcl
+++ b/imunes.tcl
@@ -112,9 +112,6 @@ if { [file exists /usr/local/xorp/bin/xorp_rtrmgr] } {
     set supp_router_models "xorp $supp_router_models"
 }
 
-#proc nexec { args } {
-    #exec $args
-#}
 
 #
 # Initialization should be complete now, so let's start doing something...

diff --git a/quagga.tcl b/quagga.tcl
index 231a673b7495760406d60aa7cd12dbb0f3232a5c..c210e192351df93e357096019efbc46bda1eb9b0 100755 (executable)
--- a/quagga.tcl
+++ b/quagga.tcl
@@ -66,6 +66,7 @@ proc $MODULE.cfggen { node } {
                lappend cfg "$line"
            }
        }
+       lappend cfg "!"
     }
 
     foreach statrte [getStatIPv4routes $node] {