fix gkz#897

pepkin88 · Jul 31, 2018 · 2d38bad · 2d38bad
1 parent 94f429b
commit 2d38bad
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 4 deletions.
diff --git a/lib/repl.js b/lib/repl.js
diff --git a/src/repl.ls b/src/repl.ls
@@ -3,6 +3,7 @@ require! {
   path
   fs
   util
+  os
   'prelude-ls': {each, lines, unlines, take}:prelude
 }
 
@@ -40,7 +41,8 @@ dasherize-vars = (str) -> if /^[a-z]/ is str then dasherize str else str
     say util.inspect x, show-hidden, depth, !process.env.NODE_DISABLE_COLORS
   ppp = !-> pp it, true, null
   MAX-HISTORY-SIZE = 500
-  history-file = path.join process.env.HOME, '/.lsc_history'
+  home-dir = os.homedir?! or process.env.HOME or process.env.USERPROFILE
+  history-file = path.join home-dir, '/.lsc_history'
   code   = if repl.infunc then '  ' else ''
   cont   = 0
   rl     = require 'readline' .create-interface stdin, stdout