Pup-Events-Demo 1.2 → 1.3

raw patch · 2 files changed

+3/−3 lines, 2 filesdep ~Pup-Events-Server

Dependency ranges changed: Pup-Events-Server

Files

• EventsServer/ServerDemo.hs +1/−1
• Pup-Events-Demo.cabal +2/−2

@@ -29,7 +29,7 @@     do  args <- getArgs         let ip = args !! 0         let priorities = read (args !! 1) :: Int-        Server.server (Just ip) priorities lookupPriorityServer lookupUnHandlerServer lookupHandlerServer parsersServer Nothing+        Server.server (Just ip) priorities "1267" lookupPriorityServer lookupUnHandlerServer lookupHandlerServer parsersServer Nothing  -- |Put your event models here. I haven't done so here, but you can define an event that will fire whenever a client disconnects and pass it into @Server.server@. This would be useful in an application requiring authentication to log out a client whenever they disconnect. data Event = Click Float Float | Init

@@ -1,5 +1,5 @@ name:                   Pup-Events-Demo-version:                1.2+version:                1.3 synopsis:               A networked event handling framework for hooking                         into other programs. description:            Pup-Events is a networking enabled event handling@@ -22,7 +22,7 @@ executable server     main-is:            EventsServer/ServerDemo.hs     default-language:   Haskell98-    build-depends:      base == 4.*, Pup-Events-Server >= 1.1.2, parsec >= 3.1.1+    build-depends:      base == 4.*, Pup-Events-Server >= 1.2, parsec >= 3.1.1     ghc-options:        -threaded  executable demo