untappd: add badge support

Note: this may not work on the first try. I'm not going to sit around
waiting for a badged checkin in #test.

plugins/beers/beers.go

@@ -287,6 +287,14 @@ type checkin struct {
 			}
 		}
 	}
+	Badges struct {
+		Count int
+		Items []struct {
+			BadgeName        string `json:"badge_name"`
+			BadgeDescription string `json:"badge_description"`
+			BadgeImage       string `json:"badge_image"`
+		}
+	}
 }
 
 type mrUntappd struct {
@@ -421,6 +429,16 @@ func (p *BeersPlugin) checkUntappd(c bot.Connector, channel string) {
 				AltTxt: "Here's a photo",
 			})
 		}
+		if checkin.Badges.Count > 0 {
+			msg = msg + "\nThis checkin earned the following badge(s): "
+			for _, b := range checkin.Badges.Items {
+				msg = msg + b.BadgeName
+				args = append(args, bot.ImageAttachment{
+					URL:    b.BadgeImage,
+					AltTxt: b.BadgeDescription,
+				})
+			}
+		}
 
 		user.lastCheckin = checkin.Checkin_id
 		_, err := p.db.Exec(`update untappd set