Remove unused import in Data.Time

Author: wereHamster

src/Data/Date.purs

@@ -20,6 +20,7 @@ module Data.Date
 
 import Prelude
 
+import Control.Monad
 import Control.Monad.Eff
 import Data.Enum (Enum, Cardinality(..), fromEnum, defaultSucc, defaultPred)
 import Data.Function (on, Fn2(), runFn2, Fn3(), runFn3)
@@ -40,10 +41,8 @@ newtype Date = DateTime JSDate
 instance genericDate :: Generic Date where
   toSpine d = SProd "Date" [const (toSpine $ toEpochMilliseconds d)]
   toSignature _ = SigProd [{ sigConstructor: "Date", sigValues: [const SigNumber] }]
-  fromSpine (SProd "Date" [msf]) = case msf unit of
-    (SNumber ms) -> fromEpochMilliseconds $ Milliseconds ms
-    _            -> Nothing
-  fromSpine _ = Nothing
+  fromSpine (SProd "Date" [msf]) = fromSpine (msf unit) >>= fromEpochMilliseconds
+  fromSpine _                    = Nothing
 
 instance eqDate :: Eq Date where
   eq = eq `on` toEpochMilliseconds

src/Data/Time.purs

@@ -6,7 +6,6 @@ import Prelude
   , (++)
   , (-)
   , (/)
-  , (/=)
   , (==)
   , DivisionRing
   , Eq