Permalink
Browse files

Add debug page

  • Loading branch information...
1 parent 5062d26 commit 9a252e098d49c5caca2481118e53be9cc5e5bf2e @autarch autarch committed Mar 16, 2012
Showing with 23 additions and 0 deletions.
  1. +7 −0 lib/VegGuide/Controller/Site/Admin.pm
  2. +16 −0 share/mason/site/admin/debug
View
7 lib/VegGuide/Controller/Site/Admin.pm
@@ -123,4 +123,11 @@ sub users_with_profiles : Local {
$c->stash()->{users} = VegGuide::User->All( with_profile => 1 );
}
+sub debug : Local {
+ my $self = shift;
+ my $c = shift;
+
+ $c->stash()->{template} = '/site/admin/debug';
+}
+
1;
View
16 share/mason/site/admin/debug
@@ -0,0 +1,16 @@
+<h2>%ENV</h2>
+
+<pre>
+<% Data::Dumper::Concise::Dumper(\%ENV) %>
+
+</pre>
+
+<h2>$c->engine()->env()</h2>
+
+<pre>
+<% Data::Dumper::Concise::Dumper($c->engine()->env()) %>
+</pre>
+
+<%once>
+use Data::Dumper::Concise ();
+</%once>

0 comments on commit 9a252e0

Please sign in to comment.