diff options
Diffstat (limited to 'src/Plugin/GitHubCommit.hs')
| -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 24c4831..8fa8d0a 100644 --- a/src/Plugin/GitHubCommit.hs +++ b/src/Plugin/GitHubCommit.hs @@ -2,6 +2,9 @@ module Plugin.GitHubCommit ( gitHubCommit ) where +import Text.Regex.TDFA + +import qualified Message as M import Plugin.Base gitHubCommit = Plugin @@ -10,4 +13,5 @@ gitHubCommit = Plugin } gitHubCommitAction :: PluginAction -gitHubCommitAction match = "https://github.com/" ++ match +gitHubCommitAction message = + "https://github.com/" ++ M.text message =~ matchRegex gitHubCommit |