diff --git a/octohat.cabal b/octohat.cabal
--- a/octohat.cabal
+++ b/octohat.cabal
@@ -1,12 +1,14 @@
 Name:                octohat
-Version:             0.1
-Synopsis:            A tested, minimal wrapper around GitHub's API. Very incomplete at the moment
+Synopsis:            A tested, minimal wrapper around GitHub's API.
+Version:             0.1.1
 License:             MIT
 Author:              Stack Builders
 Maintainer:          hackage@stackbuilders.com
 Stability:           Experimental
 Category:            Network
 Build-type:          Simple
+Homepage:            https://github.com/stackbuilders/octohat
+Bug-reports:         https://github.com/stackbuilders/octohat/issues
 Cabal-version:       >=1.10
 
 Library
@@ -61,3 +63,7 @@
   other-modules:    Network.Octohat.TestData,
                     Network.Octohat.TestUtil
   default-language:   Haskell2010
+
+source-repository head
+  type: git
+  location: https://github.com/stackbuilders/octohat
diff --git a/spec/Network/Octohat/TestData.hs b/spec/Network/Octohat/TestData.hs
--- a/spec/Network/Octohat/TestData.hs
+++ b/spec/Network/Octohat/TestData.hs
@@ -50,7 +50,7 @@
 loadTestOrganizationName = organization `fmap` loadEnv
 
 loadOwnerTeam :: GitHub Team
-loadOwnerTeam = liftIO (organization `fmap` loadEnv) >>= teamForTeamNameInOrg "Owners"
+loadOwnerTeam = liftIO (organization `fmap` loadEnv) >>= flip teamForTeamNameInOrg "Owners"
 
 loadTestAccountOne :: GitHub Member
 loadTestAccountOne = liftIO (accountOne `fmap` loadEnv) >>= userForUsername
diff --git a/src/Network/Octohat.hs b/src/Network/Octohat.hs
--- a/src/Network/Octohat.hs
+++ b/src/Network/Octohat.hs
@@ -38,10 +38,10 @@
   let memberFingerprints = publicKeySetToFingerprints pubKeys
   return $ makeMembersWithKey members pubKeys memberFingerprints
 
-teamForTeamNameInOrg :: T.Text -- ^ Team name
-                     -> T.Text -- ^ Organization name
+teamForTeamNameInOrg :: T.Text -- ^ Organization name
+                     -> T.Text -- ^ Team name
                      -> GitHub Team
-teamForTeamNameInOrg nameOfTeam nameOfOrg = do
+teamForTeamNameInOrg nameOfOrg nameOfTeam = do
   teams <- teamsForOrganization nameOfOrg
   tryHead NotFound (teamsWithName nameOfTeam teams)