Changeset 80287

Timestamp:

07/08/11 09:50:30 (4 years ago)

Author:

jmr@…

Message:

set a fake env(HOME) if none exists, to appease tcl library code

File:

• trunk/base/src/macports1.0/macports.tcl (modified) (1 diff)

trunk/base/src/macports1.0/macports.tcl

@@ -491 +491 @@
         # Otherwise define the user directory as a direcotory that will never exist
         set macports::macports_user_dir "/dev/null/NO_HOME_DIR"
+        # Tcl library code wants to do tilde expansion in various places
+        set env(HOME) ${macports::macports_user_dir}
     }