$config{BuddyListPane}->bind(         '<3>' => sub {             my $last_clicked = $config{BuddyListPane}->nearest(shift->{'_XEvent_'}->y);             $popup->Popup(                  -popover => "cursor",                  -popanchor => 'nw'             );         },     );