anchor.diff:  					[struct, "pull_request", struct, "base", struct, "label"],
   					[struct, "pull_request", struct, "head", struct, "label"],
   					[struct, "pull_request", struct, "html_url"]
  -				]);
  +				])];
   		"closed" ->
  -			create_message(JSON, "[~s] ~s closed pull request #~b: ~s (~s...~s) ~s", [
  +			[create_message(JSON, "[~s] ~s closed pull request #~b: ~s (~s...~s) ~s", [
   					[struct, "pull_request", struct, "base", struct, "repo", struct, "name"],
   					[struct, "sender", struct, "login"],
   					[struct, "pull_request", struct, "number"],
  
positive.code: 	end.
  
  handle_decoded(JSON, Channels) ->
  	Message = case traverse_json(JSON, [struct, "action"]) of
  		"opened" ->
  			create_message(JSON, "[~s] ~s opened pull request #~b: ~s (~s...~s) ~s", [
  					[struct, "pull_request", struct, "base", struct, "repo", struct, "name"],
  					[struct, "sender", struct, "login"],
  					[struct, "pull_request", struct, "number"],
  
negative.code: 					[struct, "pull_request", struct, "base", struct, "label"],
  					[struct, "pull_request", struct, "head", struct, "label"],
  					[struct, "pull_request", struct, "html_url"]
  				])];
  		"reopened" ->
  			[create_message(JSON, "[~s] ~s reopened pull request #~b: ~s (~s...~s) ~s", [
  					[struct, "pull_request", struct, "base", struct, "repo", struct, "name"],
  					[struct, "sender", struct, "login"],
  					[struct, "pull_request", struct, "number"],
  