diff options
author | Jesse Luehrs <doy@tozt.net> | 2009-08-24 00:44:17 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2009-08-24 02:29:40 -0500 |
commit | d23fc07e2c69e1c3a200092613e40b5e90f73f81 (patch) | |
tree | b6d4a38cf17b1b40e286fc94c189eda2d5e22c39 /lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm | |
parent | cad0cd7a59ac086fe2ba6264440a517cd34bf223 (diff) | |
download | im-engine-plugin-commands-d23fc07e2c69e1c3a200092613e40b5e90f73f81.tar.gz im-engine-plugin-commands-d23fc07e2c69e1c3a200092613e40b5e90f73f81.zip |
port over the basic structure from Bot::Games
Diffstat (limited to 'lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm')
-rw-r--r-- | lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm b/lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm new file mode 100644 index 0000000..71c9249 --- /dev/null +++ b/lib/IM/Engine/Plugin/Commands/Trait/Class/Formatted.pm @@ -0,0 +1,26 @@ +package IM::Engine::Plugin::Commands::Trait::Class::Formatted; +use Moose::Role; + +has default_formatters => ( + traits => ['Hash'], + is => 'ro', + isa => 'HashRef[CodeRef]', + builder => '_build_default_formatters', + handles => { + formatter_for => 'get', + has_formatter => 'exists', + formattable_tcs => 'keys', + }, +); + +sub _build_default_formatters { + { + 'ArrayRef' => sub { join ', ', @{ shift() } }, + 'Bool' => sub { return shift() ? 'true' : 'false' }, + 'Object' => sub { shift() . "" }, + } +} + +no Moose::Role; + +1; |