Index: library/mongodb/example-nsf-gridfs.tcl
===================================================================
diff -u -r2fbf1bf87402e8639e772781c5719164e7e55555 -rc9ef41c49f482a38e89f7cffc54cabf909710425
--- library/mongodb/example-nsf-gridfs.tcl	(.../example-nsf-gridfs.tcl)	(revision 2fbf1bf87402e8639e772781c5719164e7e55555)
+++ library/mongodb/example-nsf-gridfs.tcl	(.../example-nsf-gridfs.tcl)	(revision c9ef41c49f482a38e89f7cffc54cabf909710425)
@@ -50,7 +50,7 @@
 set fn README
 if {[file readable $fn]} {
   set r [::mongo::gridfs::store_file $gridFS $fn $fn text/plain]
-  puts stderr r=$r
+  puts stderr "::mongo::gridfs::store_file returned $r"
 } else {
   puts stderr "no such file: $fn"
 }
@@ -60,7 +60,7 @@
 # of 500 bytes, and close it finally.
 #
 set f [mongo::gridfile::open $gridFS README]
-puts stderr "\nOpened grid file $f"
+puts stderr "\nOpened grid file '$f'"
 puts stderr "Metadata: [mongo::gridfile::get_metadata $f]"
 puts stderr "ContentLength: [mongo::gridfile::get_contentlength $f]"
 puts stderr "ContentType: [mongo::gridfile::get_contenttype $f]"