From b7ae4dfc573e38f3ae96aecfb2f3d357ab425ca8 Mon Sep 17 00:00:00 2001
From: Oliver Gorwits <oliver@cpan.org>
Date: Mon, 4 Mar 2013 23:01:31 +0000
Subject: [PATCH] add cache headers for static content

---
 Netdisco/Makefile.PL         |  1 +
 Netdisco/bin/netdisco-web-fg | 12 ++++++++++++
 2 files changed, 13 insertions(+)

diff --git a/Netdisco/Makefile.PL b/Netdisco/Makefile.PL
index 5c8d137c..c668ae66 100644
--- a/Netdisco/Makefile.PL
+++ b/Netdisco/Makefile.PL
@@ -22,6 +22,7 @@ requires 'MCE' => 1.305;
 requires 'Net::MAC' => 0;
 requires 'NetAddr::IP' => 0;
 requires 'Path::Class' => 0;
+requires 'Plack::Middleware::Expires' => 0;
 requires 'Role::Tiny' => 0;
 requires 'Socket6' => 0;
 requires 'Starman' => 0;
diff --git a/Netdisco/bin/netdisco-web-fg b/Netdisco/bin/netdisco-web-fg
index 882d47ba..a66965e6 100755
--- a/Netdisco/bin/netdisco-web-fg
+++ b/Netdisco/bin/netdisco-web-fg
@@ -21,5 +21,17 @@ debug sprintf "App::Netdisco %s", ($App::Netdisco::VERSION || 'HEAD');
 my $home = ($ENV{NETDISCO_HOME} || $ENV{HOME});
 set('session_dir', dir($home, 'netdisco-web-sessions'));
 
+set plack_middlewares => [
+  [ Expires => (
+      content_type => [qw{ application/javascript text/css }, qr{image}],
+      expires => 'access plus 1 day',
+  )],
+  [ Static => (
+      path => qr{^/(?:javascripts|css|font|images)/},
+      root => $ENV{DANCER_PUBLIC},
+      pass_through => 1,
+  )],
+];
+
 use App::Netdisco::Web;
 dance;