Index: generic/nsf.c
===================================================================
diff -u -rc00fbde4c8915bcb44734039601af5cbeaab2971 -r4befd49a711512427661098a7de2957992a09cfd
--- generic/nsf.c	(.../nsf.c)	(revision c00fbde4c8915bcb44734039601af5cbeaab2971)
+++ generic/nsf.c	(.../nsf.c)	(revision 4befd49a711512427661098a7de2957992a09cfd)
@@ -16819,6 +16819,7 @@
       trt.usec = 0;
     }
 #endif
+
     if ((cmdFlags & NSF_CMD_DEPRECATED_METHOD) != 0) {
       NsfDeprecatedCmd(interp, "proc", ObjStr(objv[0]), "");
     }
@@ -27161,7 +27162,7 @@
     return result;
   }
 
-  if (parsedParam.paramDefs != NULL || with_Debug != 0) {
+  if (parsedParam.paramDefs != NULL || with_Debug != 0 || with_Deprecated != 0) {
     /*
      * We need parameter handling. In such cases, a thin C-based layer
      * is added which handles the parameter passing and calls the proc
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"
   }
 
   #
Index: generic/predefined.h
===================================================================
diff -u -r96f4410aa6510a664938b6ef6e5d43c3a3a18d68 -r4befd49a711512427661098a7de2957992a09cfd
--- generic/predefined.h	(.../predefined.h)	(revision 96f4410aa6510a664938b6ef6e5d43c3a3a18d68)
+++ generic/predefined.h	(.../predefined.h)	(revision 4befd49a711512427661098a7de2957992a09cfd)
@@ -63,9 +63,9 @@
 "puts stderr \"$level: $msg\"}}\n"
 "namespace eval ::nsf::debug {}\n"
 "proc ::nsf::debug::call {level objectInfo methodInfo arglist} {\n"
-"nsf::log Warning \"DB call($level) - $objectInfo $methodInfo $arglist\"}\n"
+"nsf::log Debug \"call($level) - $objectInfo $methodInfo $arglist\"}\n"
 "proc ::nsf::debug::exit {level objectInfo methodInfo result usec} {\n"
-"nsf::log Warning \"DB exit($level) - $objectInfo $methodInfo $usec usec -> $result\"}\n"
+"nsf::log Debug \"exit($level) - $objectInfo $methodInfo $usec usec -> $result\"}\n"
 "proc ::nsf::deprecated {what oldCmd newCmd} {\n"
 "set msg \"*** $what $oldCmd is deprecated.\"\n"
 "if {$newCmd ne \"\"} {append msg \" use $newCmd instead.\"}\n"