X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=testcases%2Ft%2F113-urgent.t;h=bb913819b108526371dbc1430813197e8d7dd80a;hb=3ba8642efd15456ab882a5f548bd6a28169ca3d0;hp=2eb853de1cd958c4880ac934aee76ba7698b7a9a;hpb=d6b1f1a1b2acfc700075536fd996b371cfc5d89a;p=i3%2Fi3

diff --git a/testcases/t/113-urgent.t b/testcases/t/113-urgent.t
index 2eb853de..bb913819 100644
--- a/testcases/t/113-urgent.t
+++ b/testcases/t/113-urgent.t
@@ -24,8 +24,11 @@ my $_NET_WM_STATE_TOGGLE = 2;
 sub set_urgency {
     my ($win, $urgent_flag, $type) = @_;
     if ($type == 1) {
+        # Because X11::XCB does not keep track of clearing the urgency hint
+        # when receiving focus, we just delete it in all cases and then re-set
+        # it if appropriate.
+        $win->delete_hint('urgency');
         $win->add_hint('urgency') if ($urgent_flag);
-        $win->delete_hint('urgency') if (!$urgent_flag);
     } elsif ($type == 2) {
         my $msg = pack "CCSLLLLLL",
             X11::XCB::CLIENT_MESSAGE, # response_type