perl - ロール内で MooseX::ClassAttribute を使用するにはどうすればよいですか?

Question

ロールでMooseX::ClassAttributeを使用したいと思い ます。つまり、次のようなことをします

package Cachable;

use Moose::Role;
use MooseX::ClassAttribute;

class_has Cache => ( is => 'rw' );

1;

残念ながら、MooseX::ClassAttribute の深い魔法は、Moose::Role ではなく Moose オブジェクト内から呼び出されることを想定しているため、上記のコードは機能しません。
これを回避する方法はありますか、それとも既知の制限ですか?

Answer 1

これを機能させるパッチを送ってください。確かに実行可能ですが、ロールが属性を処理する方法が原因で、Moose の内部構造が必要以上に難しくなっています。