peer: implement committed_to_htlcs().

Simply count how many HTLCs are in our current funding state.

Signed-off-by: Rusty Russell <rusty@rustcorp.com.au>

daemon/peer.c

@@ -674,8 +674,8 @@ const struct htlc *peer_tx_revealed_r_value(struct peer *peer,
 
 bool committed_to_htlcs(const struct peer *peer)
 {
-	/* FIXME */
+	return tal_count(peer->cstate->a.htlcs) != 0
-	return false;
+		|| tal_count(peer->cstate->b.htlcs) != 0;
 }
 
 /* Create a bitcoin close tx. */