Merge branch 'master' of github.com:sukria/Broadway

sukria · Feb 22, 2011 · aa155f1 · aa155f1
2 parents 4fadce3 + b1a0cbc
commit aa155f1
Showing 1 changed file with 15 additions and 3 deletions.
diff --git a/lib/Broadway/UI.pm b/lib/Broadway/UI.pm
@@ -2,7 +2,6 @@ package Broadway::UI;
 
 use Dancer ':syntax';
 use Dancer::Plugin::Ajax;
-
 use Broadway::Slide;
 
 sub display_slide {
@@ -11,16 +10,29 @@ sub display_slide {
     return template("slide-$slide");
 }
 
+ajax '/preview' => sub {
+    my $next = Broadway::Slide->current + 1;
+    content_type "text/html; charset=UTF-8";
+    display_slide($next);
+};
+
 before_template sub { 
     my $tokens = shift;
     if (request->agent =~ /Android|iPhone/i) {
-        debug "is_multi_touch : ".request->user_agent;
         $tokens->{is_multi_touch} = 1;
     }
 };
 
 get '/' => sub { 
-    template 'slideshow';
+
+    my $tokens = {};
+
+    if (request->agent =~ /Android|iPhone/i) {
+        debug "is_multi_touch : ".request->user_agent;
+        $tokens->{is_multi_touch} = 1;
+    }
+
+    template 'slideshow', $tokens;
 };
 
 get '/slide/:slide' => sub {