aboutsummaryrefslogtreecommitdiffstats
path: root/src/Plugin/GitHubCommit.hs
diff options
context:
space:
mode:
authorTeddy Wing2017-08-02 22:39:58 +0200
committerTeddy Wing2017-08-02 22:39:58 +0200
commitec4e955566049551fb7b82cc9d935981eee7df01 (patch)
treecb9e033bf1a74b680d9f0a9c581187453b55d39a /src/Plugin/GitHubCommit.hs
parent15bc2c77036596575fc2ecad816befe48839fb0c (diff)
downloadsorbot-ec4e955566049551fb7b82cc9d935981eee7df01.tar.bz2
GitHubCommit.hs: Remove progress development comments
Added these while developing ff00355ade021d3e06d55017c5337f488474e5cb to test out different theories while trying to get the project to compile. These are no longer relevant any more, so delete them.
Diffstat (limited to 'src/Plugin/GitHubCommit.hs')
-rw-r--r--src/Plugin/GitHubCommit.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Plugin/GitHubCommit.hs b/src/Plugin/GitHubCommit.hs
index b95cfd2..a12087c 100644
--- a/src/Plugin/GitHubCommit.hs
+++ b/src/Plugin/GitHubCommit.hs
@@ -16,8 +16,6 @@ gitHubCommit = Plugin
, perform = gitHubCommitAction
}
--- gitHubCommitAction :: IO PluginAction
--- gitHubCommitAction :: M.Message -> Connection -> IO String
gitHubCommitAction :: PluginAction
gitHubCommitAction message dbConn = do
rs <- query_ dbConn "SELECT channel, repo_url \
@@ -35,7 +33,6 @@ type Id = Int
type RepoUrl = String
-- | A type to match the database table for this plugin.
--- data ChannelRepoUrl = ChannelRepoUrl Id M.Channel RepoUrl deriving (Show)
data ChannelRepoUrl = ChannelRepoUrl
{ channel :: M.Channel
, repoUrl :: RepoUrl