Index: generic/nsf.tcl =================================================================== diff -u -r6c2e8f94be1ba335ff90d4b6b5132c98a9f5c242 -rf2c0f8e055015e58f3fa7bd338c872a2b7d76113 --- generic/nsf.tcl (.../nsf.tcl) (revision 6c2e8f94be1ba335ff90d4b6b5132c98a9f5c242) +++ generic/nsf.tcl (.../nsf.tcl) (revision f2c0f8e055015e58f3fa7bd338c872a2b7d76113) @@ -77,6 +77,19 @@ } # initialize exit handler ::nsf::exithandler unset + + # + # logger + # + if {[info command ::ns_log] ne ""} { + proc ::nsf::log {level msg} { + ns_log $level "nsf: $msg" + } + } else { + proc ::nsf::log {level msg} { + puts stderr "$level: $msg" + } + } # # determine platform aware temp directory