anchor.diff:  %% e.g.
   %% ```
   %% Input   : <<"[[[ https://github.com/soranoba/preminder ]]]">>
  -%% Pattern : <<"https?://github.com/([^/\s]*)/([^/\s]*)">>
  +%% Pattern : <<"https?://github.com/([^/\\s]*)/([^/\\s]*)">>
   %%
   %% $$ : <<"https://github.com/soranoba/preminder">>
   %% $1 : <<"soranoba">>
  
positive.code: %%----------------------------------------------------------------------------------------------------------------------
  
  task_remind(Text, Channel) ->
      Matches = matches(Text, <<"https?://[^\s]*(pull|issue)/[0-9]*">>),
      Urls = [GithubUrl || [GithubUrl | _] <- Matches],
      Ret = preminder_pr:r_list(Urls),
      preminder_slack:post(Channel, bbmustache:compile(bbmustache:parse_file(?PRIV("list_all.mustache")), Ret)).
  
negative.code: 
      case binary:match(preminder_github:endpoint(), Host) =/= nomatch andalso preminder_github:pr(Owner, Repos, Number) of
          {ok, Body, open} ->
              Accounts = [Account || [_, _, Account] <- matches(Body, <<"(-|\\*)\\s*\\[\\s\\]\\s@([^\\s\\r\\n]*)\\s*">>)],
              _ = ?NOT(lists:all(fun(Account) -> preminder_user:github_to_mail(Account) =/= error end, Accounts),
                       case preminder_github:fetch_mails(Owner, Repos, Number) of
                           {ok, GithubInfos} ->
  