Fey::Role::HasAliasName - A role for objects that bring an alias with them
package My::Thing;
use Moose;
with 'Fey::Role::HasAliasName'
=> { generated_alias_prefix => 'THING' };
This role adds an alias_name attribute to objects, as well as some methods for making use of that alias.
The prefix that generated aliases will have, e.g. LITERAL, FUNCTION, etc. Required.
If true, sql_with_alias() will wrap the output of sql() when generating its own output. Default is false.
Returns the current alias name, if any.
$obj->set_alias_name('my object');
Sets the current alias name.
Returns the appropriate SQL snippet. sql_with_alias will generate an alias if one has not been set (using generated_alias_prefix, above).
Hans Dieter Pearcey <hdp.cpan.fey@weftsoar.net>
See Fey for details on how to report bugs.
Copyright 2006-2009 Dave Rolsky, All Rights Reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
