templates/changes/view.html.ep

   1 % layout 'default';
   2
   3 % my $action = $uid;
   4 % $action =~ s/^.+\.([^\.]+)$/$1/;
   5 % $action = url_for( controller => 'data', action => $action );
   6 <form action=<%= $action %>>
   7 <input type=submit value="<%= $action %>">
   8 % my $params = $change->{params};
   9 <ul>
  10 % while ( @$params ) {
  11 %       my $n = shift @$params;
  12 %       my $v = shift @$params;
  13 <li><label>
  14 <%= $n %>
  15 <input type=checkbox name="<%= $n %>" value="<%= $v %>" checked>
  16 <%= $v %>
  17 </label>
  18 % }
  19 </ul>
  20 </form>
  21
  22 <pre class=debug><%= dumper $change %></pre>