Commits

gustafn  committed 34a5c3d

- Do not save variables of the toplevel namespace into the blueprint. OpenACS had with this a problem, since the database handles are managed via global variables, which is solved by this modification.

  • Participants
  • Parent commits 9fad2f3

Comments (0)

Files changed (1)

File tcl/nstrace.tcl

             #    namespace eval $nsp {}
             # entry by adding the space.
             append script " "
+	    
+	    #
+	    # Keep the variables of all namespaces except these of "::"
+	    #
+	    if {$nsp ne "::"} {
+		foreach vn [info vars ${nsp}::*] {
+		    append script [_varscript $vn]
+		}
+	    }
 
-
-            foreach vn [info vars ${nsp}::*] {
-                append script [_varscript $vn]
-            }
+	    #
+	    # Save procs and command of all namespaces
+	    #
             foreach pn [info procs ${nsp}::*] {
                 set orig [namespace origin $pn]
                 if {$orig ne [namespace which -command $pn]} {