diff --git a/EventsServer/ServerDemo.hs b/EventsServer/ServerDemo.hs
--- a/EventsServer/ServerDemo.hs
+++ b/EventsServer/ServerDemo.hs
@@ -29,9 +29,9 @@
     do  args <- getArgs
         let ip = args !! 0
         let priorities = read (args !! 1) :: Int
-        Server.server (Just ip) priorities lookupPriorityServer lookupUnHandlerServer lookupHandlerServer parsersServer
+        Server.server (Just ip) priorities lookupPriorityServer lookupUnHandlerServer lookupHandlerServer parsersServer Nothing
 
--- |Put your event models here
+-- |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
     deriving (Show)
 
diff --git a/Pup-Events-Demo.cabal b/Pup-Events-Demo.cabal
--- a/Pup-Events-Demo.cabal
+++ b/Pup-Events-Demo.cabal
@@ -1,5 +1,5 @@
 name:                   Pup-Events-Demo
-version:                1.0
+version:                1.1
 synopsis:               A networked event handling framework for hooking
                         into other programs.
 description:            Pup-Events is a networking enabled event handling