% layout 'ui'; % my $dump = param('dump'); % my $apply_on_path = param('apply_on_path');
on <%= $#{ $changes } + 1 %> % if ( $apply_on_path ) { % if ( ! param('commit') ) { % } else { Changes commited to <%= $apply_on_path %> % } % }
% my $tr = { new => [ qw( old new ) ], code => [ qw( code columns_changed ) ] }; % foreach my $e ( @$changes ) { % foreach my $type ( keys %$tr ) { % if ( exists $e->{$type} ) { % delete $tr->{$type}; last; % } % } % }
<%= $tr->{$type}->[0] %> <%= $tr->{$type}->[1] %>
<%= $e->{time} %> <%= $e->{column} %> % if ( my $status = $e->{_status} ) { % my ( $pk, $id ) = %{ $e->{unique} }; <%= $id %> <%= $status %> % } else { remove % } % if ( defined $e->{new} ) { <%== defined $e->{old} && join('', @{$e->{old}}) %> <%== join('', @{$e->{new}}) %> % } elsif ( defined $e->{code} ) {
<%= $e->{code} %>
<%= dumper $e->{commit_changed} %>
% } else {
<%= dumper $e %>
% } % if ( $dump ) {
<%= dumper $e %>
% }
<%= dumper( $stats ) %>