Skip to content

P
purescript-gargantext
Commit 5b601a10 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[utils] fix import error

parent e3947a48
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 2 deletions
src/Gargantext/Utils.purs
View file @ 5b601a10
...@@ -12,7 +12,7 @@ import Data.Unfoldable (class Unfoldable) ...@@ -12,7 +12,7 @@ import Data.Unfoldable (class Unfoldable)
import DOM.Simple.Window (window) import DOM.Simple.Window (window)
import Effect (Effect) import Effect (Effect)
import Prelude import Prelude
import Web.HTML (window) import Web.HTML as WHTML
import Web.HTML.Window (location) import Web.HTML.Window (location)
import Web.HTML.Location as WHL import Web.HTML.Location as WHL
...@@ -103,6 +103,6 @@ sortWith f = map (\(On _ y) -> y) <<< OSeq.toUnfoldable <<< foldr (\x -> OSeq.in ...@@ -103,6 +103,6 @@ sortWith f = map (\(On _ y) -> y) <<< OSeq.toUnfoldable <<< foldr (\x -> OSeq.in
href :: Effect String href :: Effect String
href = do href = do
w <- window w <- WHTML.window
loc <- location w loc <- location w
WHL.href loc WHL.href loc
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment