The R Project SVN – R – Diff – /branches/R-classInheritance/src/gnuwin32/system.c

     sprintf(RHome, "R_HOME=%s", R_Home);
     putenv(RHome);
     strcpy(UserRHome, "R_USER=");
     strcat(UserRHome, Rp->home);
     putenv(UserRHome);
+    if( !getenv("HOME") ) {
+	strcpy(UserRHome, "HOME=");
+	strcat(UserRHome, getRUser());
+	putenv(UserRHome);
+    }
     /* Rterm and Rgui set CharacterMode during startup, then set Rp->CharacterMode
        from it in cmdlineoptions().  Rproxy never calls cmdlineoptions, so we need the
        line below */

The R Project SVN R