From e61d4e633d933bcaf7e01206b1c2c24fd894ff69 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Tue, 5 Mar 2013 16:23:56 -0400
Subject: fix pair complete alert combining

The pairing complete alert had been conbining with some other alert, fixed
this and now it's displayed once xmpp pairing is complete on both sides.
---
 Assistant/Alert.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Assistant/Alert.hs b/Assistant/Alert.hs
index ea576c668..65f8c3e67 100644
--- a/Assistant/Alert.hs
+++ b/Assistant/Alert.hs
@@ -313,6 +313,7 @@ pairRequestAcknowledgedAlert :: String -> Maybe AlertButton -> Alert
 pairRequestAcknowledgedAlert who button = baseActivityAlert
 	{ alertData = ["Pairing with", UnTensed (T.pack who), Tensed "in progress" "complete"]
 	, alertPriority = High
+	, alertName = Just $ PairAlert who
 	, alertCombiner = Just $ dataCombiner $ \_old new -> new
 	, alertButton = button
 	}
-- 
cgit v1.2.3