package Bogus;
use strict;
use X11::GUITest qw(SendKeys); # and whatever other functions
####
package MyBogus;
use Moose;
use MooseX::NonMoose;
extends 'Bogus';
around ...;
####
package X11::GUITest::Moosified;
use Moose;
use MooseX::NonMoose;
extends 'X11::GUITest';
around ['SendKeys'] => sub {
...
};