diff options
| -rw-r--r-- | src/Plugin/GitHubCommit.hs | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Plugin/GitHubCommit.hs b/src/Plugin/GitHubCommit.hs index e5af381..4175fb8 100644 --- a/src/Plugin/GitHubCommit.hs +++ b/src/Plugin/GitHubCommit.hs @@ -16,8 +16,12 @@ gitHubCommitAction :: PluginAction gitHubCommitAction message = "https://github.com/" ++ M.text message =~ matchRegex gitHubCommit +type Id = Int + +type RepoUrl = String + -- | A type to match the database table for this plugin. -data ChannelRepoUrl = ChannelRepoUrl Int String String deriving (Show) +data ChannelRepoUrl = ChannelRepoUrl Id M.Channel RepoUrl deriving (Show) instance FromRow ChannelRepoUrl where fromRow = ChannelRepoUrl <$> field <*> field <*> field |