Index: trunk/MultiChannelUSB/UserInterface.tcl
===================================================================
--- trunk/MultiChannelUSB/UserInterface.tcl	(revision 173)
+++ trunk/MultiChannelUSB/UserInterface.tcl	(revision 174)
@@ -1667,5 +1667,5 @@
         my instvar recs_val directory
 
-        set directory $::env(HOMEPATH)
+        set directory $::env(HOME)
         set recs_val 100