[catagits/Reaction.git] / lib / Reaction / UI / Widget / Field / Image.pm

package Reaction::UI::Widget::Field::Image;

use Reaction::UI::WidgetClass;

use namespace::clean -except => [ qw(meta) ];
extends 'Reaction::UI::Widget::Field';


implements fragment image {
  if($_{viewport}->value_string) {
    arg uri => $_{viewport}->uri;
    render 'has_image';
  } else {
    render 'no_image';
  }
};

__PACKAGE__->meta->make_immutable;


1;
Commit	Line	Data
ddd1dc65	1	package Reaction::UI::Widget::Field::Image;
	2
	3	use Reaction::UI::WidgetClass;
	4
bae75bee	5	use namespace::clean -except => [ qw(meta) ];
bae75bee	6	extends 'Reaction::UI::Widget::Field';
ddd1dc65	7
bae75bee	8
	9
	10	implements fragment image {
	11	if($_{viewport}->value_string) {
	12	arg uri => $_{viewport}->uri;
	13	render 'has_image';
	14	} else {
	15	render 'no_image';
	16	}
ddd1dc65	17	};
ddd1dc65	18
bae75bee	19	__PACKAGE__->meta->make_immutable;
	20
	21
ddd1dc65	22	1;