Mercurial > octave-nkf
comparison liboctave/oct-env.cc @ 5451:ed08548b9054
[project @ 2005-09-15 19:52:50 by jwe]
author | jwe |
---|---|
date | Thu, 15 Sep 2005 19:52:50 +0000 |
parents | 4c8a2e4e0717 |
children | a921c9c17ba5 |
comparison
equal
deleted
inserted
replaced
5450:6b42c78c77d3 | 5451:ed08548b9054 |
---|---|
365 std::string | 365 std::string |
366 octave_env::do_get_home_directory (void) const | 366 octave_env::do_get_home_directory (void) const |
367 { | 367 { |
368 std::string hd = do_getenv ("HOME"); | 368 std::string hd = do_getenv ("HOME"); |
369 | 369 |
370 #if defined (__MINGW32__) | |
371 // Maybe we are started directly from cmd.exe | |
372 if (hd.empty ()) | |
373 hd = do_getenv ("HOMEPATH"); | |
374 #endif | |
375 | |
370 if (hd.empty ()) | 376 if (hd.empty ()) |
371 { | 377 { |
372 octave_passwd pw = octave_passwd::getpwuid (octave_syscalls::getuid ()); | 378 octave_passwd pw = octave_passwd::getpwuid (octave_syscalls::getuid ()); |
373 | 379 |
374 hd = pw ? pw.dir () : std::string (file_ops::dir_sep_str); | 380 hd = pw ? pw.dir () : std::string (file_ops::dir_sep_str); |