diff --git a/ghcjs-src/Miso/Subscription/History.hs b/ghcjs-src/Miso/Subscription/History.hs
--- a/ghcjs-src/Miso/Subscription/History.hs
+++ b/ghcjs-src/Miso/Subscription/History.hs
@@ -41,11 +41,11 @@
 getURI :: IO URI
 {-# INLINE getURI #-}
 getURI = do
-  URI <$> pure mempty
+  URI <$> do unpack <$> getProtocol
       <*> pure Nothing
       <*> do Prelude.drop 1 . unpack <$> getPathName
       <*> do unpack <$> getSearch
-      <*> pure mempty
+      <*> do unpack <$> getHash
 
 -- | Pushes a new URI onto the History stack
 pushURI :: URI -> IO ()
@@ -106,6 +106,12 @@
 
 foreign import javascript unsafe "$r = window.location.search;"
   getSearch :: IO JSString
+
+foreign import javascript unsafe "$r = window.location.hash;"
+  getHash :: IO JSString
+
+foreign import javascript unsafe "$r = window.location.protocol;"
+  getProtocol :: IO JSString
 
 foreign import javascript unsafe "window.addEventListener('popstate', $1);"
   onPopState :: Callback (IO ()) -> IO ()
diff --git a/miso.cabal b/miso.cabal
--- a/miso.cabal
+++ b/miso.cabal
@@ -1,5 +1,5 @@
 name:                miso
-version:             0.7.3.0
+version:             0.7.4.0
 category:            Web, Miso, Data Structures
 license:             BSD3
 license-file:        LICENSE