anchor.diff:  				])];
   		"closed" ->
   			[create_message(JSON, "[~s] ~s closed pull request #~b: ~s (~s...~s) ~s", [
  -					[struct, "pull_request", struct, "base", struct, "repo", struct, "name"],
  +					{reponame, [struct, "pull_request", struct, "base", struct, "repo"]},
   					[struct, "sender", struct, "login"],
   					[struct, "pull_request", struct, "number"],
   					[struct, "pull_request", struct, "title"],
  
positive.code: 			case lists:map(fun(T) -> traverse_json(JSON, [struct, T]) end, ["created", "deleted", "forced"]) of
  				[true, false, _] ->
  					[create_message(JSON, "[~s] ~s created ~s at ~s: ~s", [
  							[struct, "repository", struct, "name"],
  							[struct, "sender", struct, "login"],
  							{ref, [struct, "ref"]},
  							{hash, [struct, "after"]},
  
negative.code: 							{hash, [struct, "after"]},
  							[struct, "compare"]
  						]),
  					CommitList = traverse_json(JSON, [struct, "commits", array]),
  					ShowList = lists:sublist(CommitList, 3),
  					RepoBranch = create_message(JSON, "~s:~s", [
  							{reponame, [struct, "repository"]},
  							{ref, [struct, "ref"]}
  						]),
  					ShowMsgs = lists:map(fun(MJSON) ->
  						create_message(MJSON, "[~s] ~s ~s: ~s", [
  							{RepoBranch},
  							{hash, [struct, "id"]},
  							[struct, "author", struct, "username"],
  							{trunc_newline, [struct, "message"]}
  						]) end, ShowList),
  					[PushMsg | ShowMsgs];
  				[error, error, error] -> [];
  