git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Small cleanup to Language.PureScript.Interactive.IO (#2381)

* Only export functions used externally. * Remove dead method expandTilde. It looks like the only remaining caller of this method was removed in: 9e562663210e0bb798cf183a25fb84a142a7f17b * Add myself to contributors. * Remove an unused import. * Correctly alphabetize myself.

commiteaaef21f96d0d790d2e4cd0e59e89687cbea4ae4 authorpete higgins <pete@peterhiggins.org> dateTue 11 Oct 2016, 10:48 (10 years ago) parent56613a8
2 files changed+3−9
CONTRIBUTORS.md+1 src/Language/PureScript/Interactive/IO.hs+2−9
CONTRIBUTORS.md+1
@@ -63,6 +63,7 @@ This file lists the contributors to the PureScript compiler project, and the ter
6363- [@paulyoung](https://github.com/paulyoung) (Paul Young) My existing contributions and all future contributions until further notice are Copyright Paul Young, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
6464- [@pelotom](https://github.com/pelotom) (Thomas Crockett) My existing contributions and all future contributions until further notice are Copyright Thomas Crockett, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
6565- [@phadej](https://github.com/phadej) (Oleg Grenrus) My existing contributions and all future contributions until further notice are Copyright Oleg Grenrus, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
66+- [@phiggins](https://github.com/phiggins) (Pete Higgins) My existing contributions and all future contributions until further notice are Copyright Pete Higgins, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
6667- [@philopon](https://github.com/philopon) (Hirotomo Moriwaki) - My existing contributions and all future contributions until further notice are Copyright Hirotomo Moriwaki, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
6768- [@pseudonom](https://github.com/pseudonom) (Eric Easley) My existing contributions and all future contributions until further notice are Copyright Eric Easley, and are licensed to the owners and users of the PureScript compiler project under the terms of the [MIT license](http://opensource.org/licenses/MIT).
6869- [@puffnfresh](https://github.com/puffnfresh) (Brian McKenna) All contributions I made during June 2015 were during employment at [SlamData, Inc.](#companies) who owns the copyright. I assign copyright of all my personal contributions before June 2015 to the owners of the PureScript compiler.
src/Language/PureScript/Interactive/IO.hs+2−9
@@ -1,11 +1,11 @@
1−module Language.PureScript.Interactive.IO where
1+module Language.PureScript.Interactive.IO (findNodeProcess, getHistoryFilename) where
22
33import Prelude.Compat
44
55import Control.Monad (msum)
66import Control.Monad.Trans.Maybe (MaybeT(..), runMaybeT)
77import System.Directory (createDirectoryIfMissing, getHomeDirectory, findExecutable)
8−import System.FilePath (takeDirectory, (</>), isPathSeparator)
8+import System.FilePath (takeDirectory, (</>))
99
1010mkdirp :: FilePath -> IO ()
1111mkdirp = createDirectoryIfMissing True . takeDirectory
@@ -32,10 +32,3 @@ getHistoryFilename = do
3232 let filename = home </> ".purescript" </> "psci_history"
3333 mkdirp filename
3434 return filename
35−
36−-- |
37−-- Expands tilde in path.
38−--
39−expandTilde :: FilePath -> IO FilePath
40−expandTilde ('~':p:rest) | isPathSeparator p = (</> rest) <$> getHomeDirectory
41−expandTilde p = return p