--- trunk/lib/Strix/View/User.pm	2008/07/10 15:29:01	82
+++ trunk/lib/Strix/View/User.pm	2008/07/10 17:27:58	86
@@ -60,40 +60,9 @@
 	while(1) {
     	my $out;
 		if ( $self->render_as eq 'edit' ) {
-			$out = $self->render_iterator(
-				qq|<div class="editform">|,
-				sub {
-					#warn "# edit render_iterator ",dump( @_ );
-					my ( $name, $field_name, $label, $val ) = @_;
-					return if $name =~ /^_/;
-					return qq|
-						<div class=fieldholder>
-							<div class=label>$label</div>
-							<div class=field>
-								<input type=text id="$field_name" name="$field_name" value="$val">
-							</div>
-						</div>
-					|;
-				},
-				qq|</div>|
-			);
+			$out .= $self->render_edit;
 		} elsif ( $self->render_as eq 'view' ) {
-			$out = $self->render_iterator(
-				qq|<div class="view">|,
-				sub {
-					#warn "# view render_iterator ",dump( @_ );
-					my ( $name, $field_name, $label, $val ) = @_;
-					return if $name =~ /^_/;
-					return qq|
-						<div class=fieldholder>
-							<div class=label>$label</div>
-							<div class=field>$val</div>
-							</div>
-						</div>
-					|;
-				},
-				qq|</div>|
-			);
+			$out .= $self->render_view;
 		} else {
 			warn "no renderer ",dump( $self->render_as ), " skipping...";
 		}
@@ -106,6 +75,49 @@
 	}
 };
 
+sub render_edit {
+	my $self = shift;
+	warn "# render_edit ",$self->id," ",$self->uuid;
+	$self->render_iterator(
+		qq|<div class="editform">|,
+		sub {
+			#warn "# edit render_iterator ",dump( @_ );
+			my ( $name, $field_name, $label, $val ) = @_;
+			return if $name =~ /^_/;
+			return qq|
+				<div class=fieldholder>
+					<div class=label>$label</div>
+					<div class=field>
+						<input type=text id="$field_name" name="$field_name" value="$val">
+					</div>
+				</div>
+			|;
+		},
+		qq|</div>|
+	);
+}
+
+sub render_view {
+	my $self = shift;
+	warn "# render_view ",$self->id," ",$self->uuid;
+	$self->render_iterator(
+		qq|<div class="view">|,
+		sub {
+			#warn "# view render_iterator ",dump( @_ );
+			my ( $name, $field_name, $label, $val ) = @_;
+			return if $name =~ /^_/;
+			return qq|
+				<div class=fieldholder>
+					<div class=label>$label</div>
+					<div class=field>$val</div>
+					</div>
+				</div>
+			|;
+		},
+		qq|</div>|
+	);
+}
+
 use Data::Dump qw/dump/;
 
 use Strix::User;