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
03c5a956
Commit
03c5a956
authored
Nov 11, 2013
by
Andrew Gibiansky
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
Changing tooltip trigger to space, making duration 800ms.
parent
0ba3c8e7
Changes
6
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
6 changed files
with
471 additions
and
8 deletions
+471
-8
Haskell-Notebook.ipynb
Haskell-Notebook.ipynb
+1
-1
Config.hs
IHaskell/Config.hs
+4
-3
Evaluate.hs
IHaskell/Eval/Evaluate.hs
+2
-1
IPython.hs
IHaskell/IPython.hs
+2
-1
codecell.js
deps/codecell.js
+460
-0
tooltip.js
deps/tooltip.js
+2
-2
No files found.
Haskell-Notebook.ipynb
View file @
03c5a956
...
@@ -270,7 +270,7 @@
...
@@ -270,7 +270,7 @@
"cell_type": "code",
"cell_type": "code",
"collapsed": false,
"collapsed": false,
"input": [
"input": [
"
Out[1] * 2
"
"
zip
"
],
],
"language": "python",
"language": "python",
"metadata": {},
"metadata": {},
...
...
IHaskell/Config.hs
View file @
03c5a956
{-# LANGUAGE QuasiQuotes #-}
{-# LANGUAGE QuasiQuotes #-}
-- | Description : IPython configuration files are compiled-into IHaskell
-- | Description : IPython configuration files are compiled-into IHaskell
module
IHaskell.Config
(
ipython
,
notebook
,
console
,
qtconsole
,
customjs
,
tooltipjs
)
where
module
IHaskell.Config
(
ipython
,
notebook
,
console
,
qtconsole
,
customjs
,
notebookJavascript
)
where
import
Data.String.Here
import
Data.String.Here
import
ClassyPrelude
import
ClassyPrelude
...
@@ -20,5 +20,6 @@ qtconsole = [template|config/ipython_qtconsole_config.py|]
...
@@ -20,5 +20,6 @@ qtconsole = [template|config/ipython_qtconsole_config.py|]
customjs
::
String
customjs
::
String
customjs
=
[
template
|
config/custom.js
|]
customjs
=
[
template
|
config/custom.js
|]
tooltipjs
::
String
notebookJavascript
::
[(
FilePath
,
String
)]
tooltipjs
=
[
template
|
deps/tooltip.js
|]
notebookJavascript
=
[(
"tooltip.js"
,
[
template
|
deps/tooltip.js
|]
),
(
"codecell.js"
,
[
template
|
deps/codecell.js
|]
)]
IHaskell/Eval/Evaluate.hs
View file @
03c5a956
...
@@ -39,7 +39,8 @@ debug :: Bool
...
@@ -39,7 +39,8 @@ debug :: Bool
debug
=
True
debug
=
True
ignoreTypePrefixes
::
[
String
]
ignoreTypePrefixes
::
[
String
]
ignoreTypePrefixes
=
[
"GHC.Types"
,
"GHC.Base"
,
"GHC.Show"
,
"System.IO"
]
ignoreTypePrefixes
=
[
"GHC.Types"
,
"GHC.Base"
,
"GHC.Show"
,
"System.IO"
,
"GHC.Floating"
]
typeCleaner
::
String
->
String
typeCleaner
::
String
->
String
typeCleaner
=
useStringType
.
foldl'
(
.
)
id
(
map
(`
replace
`
""
)
fullPrefixes
)
typeCleaner
=
useStringType
.
foldl'
(
.
)
id
(
map
(`
replace
`
""
)
fullPrefixes
)
...
...
IHaskell/IPython.hs
View file @
03c5a956
...
@@ -96,7 +96,8 @@ writeConfigFilesTo profileDir ihaskellPath = do
...
@@ -96,7 +96,8 @@ writeConfigFilesTo profileDir ihaskellPath = do
-- The notebook/js directory many not exist, in which case we'll create it.
-- The notebook/js directory many not exist, in which case we'll create it.
mkdir_p
(
conf
"static/notebook/"
)
mkdir_p
(
conf
"static/notebook/"
)
mkdir_p
(
conf
"static/notebook/js"
)
mkdir_p
(
conf
"static/notebook/js"
)
writeFile
(
conf
"static/notebook/js/tooltip.js"
)
Config
.
tooltipjs
forM_
Config
.
notebookJavascript
$
\
(
file
,
content
)
->
writeFile
(
conf
"static/notebook/js/"
++
file
)
content
where
where
conf
filename
=
fromText
$
profileDir
++
filename
conf
filename
=
fromText
$
profileDir
++
filename
...
...
deps/codecell.js
0 → 100644
View file @
03c5a956
This diff is collapsed.
Click to expand it.
deps/tooltip.js
View file @
03c5a956
...
@@ -30,7 +30,7 @@ var IPython = (function (IPython) {
...
@@ -30,7 +30,7 @@ var IPython = (function (IPython) {
// tooltip constructor
// tooltip constructor
var
Tooltip
=
function
()
{
var
Tooltip
=
function
()
{
var
that
=
this
;
var
that
=
this
;
this
.
time_before_tooltip
=
12
00
;
this
.
time_before_tooltip
=
8
00
;
// handle to html
// handle to html
this
.
tooltip
=
\
$
(
'#tooltip'
);
this
.
tooltip
=
\
$
(
'#tooltip'
);
...
@@ -379,4 +379,4 @@ var IPython = (function (IPython) {
...
@@ -379,4 +379,4 @@ var IPython = (function (IPython) {
return
IPython
;
return
IPython
;
}(
IPython
));
}(
IPython
));
\ No newline at end of file
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