I think you should be able to adapt this to your needs by rewriting the package Bogus as follows:
package Bogus; use strict; use X11::GUITest qw(SendKeys); # and whatever other functions
(and maybe also renaming it away from Bogus to, say, Class::X11::GUITest), and then using that from the package MyBogus:
package MyBogus; use Moose; use MooseX::NonMoose; extends 'Bogus'; around ...;
In theory, you should even be able to do away with the intermediate Class::X11::GUITest class by using the following:
package X11::GUITest::Moosified; use Moose; use MooseX::NonMoose; extends 'X11::GUITest'; around ['SendKeys'] => sub { ... };
In reply to Re^5: Moose: Accessing subroutines in packages used by Moose class
by Corion
in thread Moose: Accessing subroutines in packages used by Moose class
by nysus
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |