Index: generic/nsf.tcl =================================================================== diff -u -ra41b0fa988fe2e3acf21fb0336431a2abe2d55c4 -r4befd49a711512427661098a7de2957992a09cfd --- generic/nsf.tcl (.../nsf.tcl) (revision a41b0fa988fe2e3acf21fb0336431a2abe2d55c4) +++ generic/nsf.tcl (.../nsf.tcl) (revision 4befd49a711512427661098a7de2957992a09cfd) @@ -161,10 +161,10 @@ # namespace eval ::nsf::debug {} proc ::nsf::debug::call {level objectInfo methodInfo arglist} { - nsf::log Warning "DB call($level) - $objectInfo $methodInfo $arglist" + nsf::log Debug "call($level) - $objectInfo $methodInfo $arglist" } proc ::nsf::debug::exit {level objectInfo methodInfo result usec} { - nsf::log Warning "DB exit($level) - $objectInfo $methodInfo $usec usec -> $result" + nsf::log Debug "exit($level) - $objectInfo $methodInfo $usec usec -> $result" } #