--- lib/Arh/View.pm	2007/11/30 20:13:06	22
+++ lib/Arh/View.pm	2007/11/30 23:23:14	23
@@ -90,6 +90,8 @@
 template '/units' => page {
 	h1 { _("Units available in system") };
 
+	show( 'toggle_edit' );
+
 	my $search = Arh::Model::UnitCollection->new;
 	$search->unlimit;
 
@@ -104,4 +106,38 @@
 
 };
 
+private template '/toggle_edit' => sub {
+	my $self = shift;
+
+	# no fun for anonymous users
+	return unless $self->current_user->id;
+
+	render_region(
+		name => 'toggle-edit',
+		path => '/toggle_edit_region',
+	);
+
+};
+
+template 'toggle_edit_region' => sub {
+	my $self = shift;
+
+	my $toggleedit = new_action( class => 'ToggleEdit' );
+
+	my $label = $self->current_user->editing ? _("Disable editing") : _("Enable editing");
+
+	warn "## $label\n";
+
+	form {
+		hyperlink(
+			label => $label,
+			onclick => {
+				submit => $toggleedit,
+				refresh_self => 1,
+			},
+		)
+	}
+
+};
+
 1;