intricacy 0.6 → 0.6.1

raw patch · 4 files changed

+9/−4 lines, 4 files

Files

Interact.hs +4/−2
NEWS +3/−0
Version.hs +1/−1
intricacy.cabal +1/−1

Interact.hs view

@@ -211,11 +211,13 @@ processCommand' IMMeta CmdToggleCacheOnly =     not <$> gets cacheOnly >>= \c -> modify $ \ms -> ms {cacheOnly = c} -processCommand' IMMeta (CmdRegister adjustReg) = void.runMaybeT $ do+processCommand' IMMeta (CmdRegister _) = void.runMaybeT $ do     regName <- mgetCurName+    mauth <- gets curAuth+    let isUs = maybe False ((==regName).authUser) mauth     let inputPassword = (hashPassword regName <$>) $ MaybeT $ lift $ 	    textInput "Enter new password:" 64 True False Nothing Nothing-    if adjustReg+    if isUs 	then msum [ do 		confirmOrBail "Log out?" 		modify $ \ms -> ms {curAuth = Nothing}

NEWS view

@@ -1,5 +1,8 @@ This is an abbreviated summary; see the git log for gory details. +0.6.1:+    Fix stupid bug preventing registration via keyboard command.+ 0.6:     New scoring system - you don't get the point for a solution if the lock 	owner has read your note.

Version.hs view

@@ -11,4 +11,4 @@ module Version where  version :: String-version = "0.6"+version = "0.6.1"

intricacy.cabal view

@@ -1,5 +1,5 @@ name:                intricacy-version:             0.6+version:             0.6.1 synopsis:            A game of competitive puzzle-design homepage:            http://mbays.freeshell.org/intricacy license:             GPL-3