packages feed

Nomyx-Core 0.7.5 → 0.7.6

raw patch · 3 files changed

+5/−5 lines, 3 filesdep ~Nomyx-Languagedep ~hscolour

Dependency ranges changed: Nomyx-Language, hscolour

Files

Nomyx-Core.cabal view
@@ -1,5 +1,5 @@ name: Nomyx-Core-version: 0.7.5+version: 0.7.6 cabal-version: >=1.6 build-type: Simple license: BSD3@@ -15,7 +15,7 @@ data-dir: data   library -    build-depends: Nomyx-Language         == 0.7.5,+    build-depends: Nomyx-Language         == 0.7.6,                    DebugTraceHelpers      == 0.12.*,                    MissingH               == 1.2.*,                    acid-state             == 0.12.*,@@ -34,7 +34,7 @@                    happstack-authenticate == 0.10.15,                    hint                   == 0.4.*,                    hint-server            == 1.4.*,-                   hscolour               == 1.20.*,+                   hscolour               == 1.22.*,                    ixset                  == 1.0.*,                    mime-mail              == 0.4.*,                    mtl                    == 2.1.*,
src/Nomyx/Core/Mail.hs view
@@ -48,7 +48,7 @@    (toHtml $ "a new rule has been proposed by player " ++ prop ++ ".") >> H.br    (toHtml $ "Name: " ++ name) >> H.br    (toHtml $ "Description: " ++ desc) >> H.br-   (toHtml $ "Code: ") >> H.br >> (preEscapedToHtml $ HSC.hscolour defaultColourPrefs False code) >> H.br >> H.br+   (toHtml $ "Code: ") >> H.br >> (preEscapedToHtml $ HSC.hscolour defaultColourPrefs False 0 code) >> H.br >> H.br    (toHtml $ "Please login into Nomyx for actions on this rule:") >> H.br    (toHtml $ nomyxURL net ++ "/Nomyx") >> H.br >> H.br    (toHtml $ "You received this mail because you subscribed to Nomyx. To stop receiving mails, login to Nomyx with the above address, go to Settings and uncheck the corresponding box.") >> H.br
src/Nomyx/Core/Session.hs view
@@ -95,7 +95,7 @@       Right _ -> do          tracePN pn "proposed rule compiled OK "          inGameDo gn $ G.execGameEvent' (Just $ getRuleFunc sh) (ProposeRuleEv pn sr)-         modifyProfile pn (pLastRule ^= Just (sr, "Rule submitted OK! See \"Rules\" tab or \"Inputs/Ouputs\" tab for actions"))+         modifyProfile pn (pLastRule ^= Just (sr, "Rule submitted OK! See \"Rules\" tab or \"Inputs/Ouputs\" tab for actions."))          liftIO $ sendMailsNewRule s sr pn (fromJust gi)       Left e -> submitRuleError sr pn gn e