/[Frey]/trunk/lib/Continuity/Widget/Style.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /trunk/lib/Continuity/Widget/Style.pm

Parent Directory Parent Directory | Revision Log Revision Log

Revision 69 - (show annotations)
Wed Jul 9 15:45:59 2008 UTC (15 years, 9 months ago) by dpavlin
File size: 282 byte(s) 
include local copy of Continuity::Widget

$ darcs show repo
          Type: darcs
        Format: darcs-1.0
          Root: /rest/cvs/Continuity-Widget
      Pristine: PlainPristine "_darcs/pristine"
         Cache: thisrepo:/rest/cvs/Continuity-Widget
Default Remote: http://thelackthereof.org/projects/perl/Continuity-Widget
   Num Patches: 29
1 package Continuity::Widget::Style;
2
3 use Moose::Role;
4
5 has attribute => ( is => 'rw', isa => 'HashRef', default => {{}} );
6
7 sub attr {
8 my ($self, $attr, $val) = @_;
9 $self->attribute->{$attr} = $val if $val;
10 return $self->attribute->{$attr} if $self->attribute->{$attr};
11 }
12
13 1;
14
  ViewVC Help
Powered by ViewVC 1.1.26