added Field::mutable::File

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

diff --git a/lib/Reaction/UI/Widget/Field/Image.pm b/lib/Reaction/UI/Widget/Field/Image.pm
new file mode 100644 (file)
index 0000000..1759d98
--- /dev/null
+++ b/lib/Reaction/UI/Widget/Field/Image.pm
@@ -0,0 +1,18 @@
+package Reaction::UI::Widget::Field::Image;
+
+use Reaction::UI::WidgetClass;
+
+class Image is 'Reaction::UI::Widget::Field', which {
+   
+  implements fragment image {
+    if($_{viewport}->value_string) {
+      arg uri => $_{viewport}->uri;
+      render 'has_image';
+    } else {
+      render 'no_image';
+    }
+  };
+
+};
+
+1;