Index: library/mongodb/nsfmongo.c
===================================================================
diff -u -rf934951db464db1a6f39ac98290ecde17a466cd7 -r6af35a888e33da976e283271bb68060f34d91a9a
--- library/mongodb/nsfmongo.c	(.../nsfmongo.c)	(revision f934951db464db1a6f39ac98290ecde17a466cd7)
+++ library/mongodb/nsfmongo.c	(.../nsfmongo.c)	(revision 6af35a888e33da976e283271bb68060f34d91a9a)
@@ -1687,7 +1687,7 @@
 Nsfmongo_ThreadExit(ClientData clientData)
 {
   /*
-   * The exit might happen at a time, when tcl is already shut down.
+   * The exit might happen at a time, when Tcl is already shut down.
    * We can't reliably call NsfLog.
    */
 
@@ -1713,7 +1713,7 @@
 Nsfmongo_Exit(ClientData clientData)
 {
   /*
-   * The exit might happen at a time, when tcl is already shut down.
+   * The exit might happen at a time, when Tcl is already shut down.
    * We can't reliably call NsfLog.
    *
    *   Tcl_Interp *interp = (Tcl_Interp *)clientData;