Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
G
gargantext-ihaskell
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
gargantext
gargantext-ihaskell
Commits
0996bef8
Commit
0996bef8
authored
May 29, 2015
by
Andrew Gibiansky
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Fix formatting
parent
33dcfcc9
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
6 additions
and
9 deletions
+6
-9
IPython.hs
src/IHaskell/IPython.hs
+6
-9
No files found.
src/IHaskell/IPython.hs
View file @
0996bef8
...
...
@@ -238,19 +238,16 @@ getIHaskellPath = do
Nothing
->
error
"ihaskell not on $PATH and not referenced relative to directory."
Just
path
->
return
$
T
.
unpack
$
SH
.
toTextIgnore
path
else
liftIO
$
makeAbsolute
f
#
if
!
MIN_VERSION_directory
(
1
,
2
,
2
)
-- This is included in later versions of `directory`, but we cannot use
-- l
ater versions because GHC l
ibrary depends on a particular version of it.
-- This is included in later versions of `directory`, but we cannot use
later versions because GHC
-- library depends on a particular version of it.
makeAbsolute
::
FilePath
->
IO
FilePath
makeAbsolute
=
fmap
FP
.
normalise
.
absolutize
where
absolutize
path
-- avoid the call to `getCurrentDirectory` if we can
|
FP
.
isRelative
path
=
fmap
(
FP
.</>
path
)
getCurrentDirectory
|
otherwise
=
return
path
where
absolutize
path
-- avoid the call to `getCurrentDirectory` if we can
|
FP
.
isRelative
path
=
fmap
(
FP
.</>
path
)
getCurrentDirectory
|
otherwise
=
return
path
#
endif
getSandboxPackageConf
::
IO
(
Maybe
String
)
getSandboxPackageConf
=
SH
.
shelly
$
do
myPath
<-
getIHaskellPath
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment