diff --git a/public/vroom.pl b/public/vroom.pl
index 1ebfaef..8cefd3d 100755
--- a/public/vroom.pl
+++ b/public/vroom.pl
@@ -15,6 +15,7 @@ use Digest::MD5 qw(md5_hex);
use MIME::Base64;
use Email::Sender::Transport::Sendmail;
use Encode;
+use File::stat;
# Used to generate thanks on the about template
our $components = {
@@ -229,6 +230,13 @@ helper get_random_name => sub {
return $name;
};
+# return the mtime of a file
+helper get_mtime => sub {
+ my $self = shift;
+ my ($file) = @_;
+ return stat($file)->mtime;
+};
+
any '/' => 'index';
get '/about' => sub {
diff --git a/templates/default/header.html.ep b/templates/default/header.html.ep
index b14f815..f5e1bee 100644
--- a/templates/default/header.html.ep
+++ b/templates/default/header.html.ep
@@ -3,8 +3,11 @@
<%= $title %>
-
-
+ <%
+ foreach my $css (qw(bootstrap.min.css vroom.css)){
+ %>
+ " rel="stylesheet" type="text/css">
+ <% } %>
diff --git a/templates/default/js_include.html.ep b/templates/default/js_include.html.ep
index de6d162..275041c 100644
--- a/templates/default/js_include.html.ep
+++ b/templates/default/js_include.html.ep
@@ -5,11 +5,9 @@
%>
var rootUrl = '<%= $url %>';
-
-
-
-
-
-
-
-
+ <% foreach my $js (qw(simplewebrtc.bundle.js jquery-1.11.1.min.js bootstrap.min.js
+ notify-combined.min.js jquery.browser.min.js sprintf.js
+ FileSaver.js vroom.js)){
+ %>
+
+ <% } %>