File: useStaticSimple.patch

package info (click to toggle)
ebug-http 0.31-2
  • links: PTS, VCS
  • area: main
  • in suites: lenny
  • size: 340 kB
  • ctags: 343
  • sloc: perl: 1,957; makefile: 6
file content (55 lines) | stat: -rw-r--r-- 1,710 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
diff -Nur ebug-http/Makefile.PL ebug-http.new/Makefile.PL
--- ebug-http/Makefile.PL	2006-03-06 19:36:09.000000000 +0000
+++ ebug-http.new/Makefile.PL	2007-10-13 16:49:03.000000000 +0000
@@ -5,7 +5,7 @@
 
 requires Catalyst => '5.64';
 requires Test::WWW::Mechanize::Catalyst => 0;
-requires Catalyst::Plugin::Static => 0;
+requires Catalyst::Plugin::Static::Simple => 0;
 requires Catalyst::View::TT => 0;
 requires Devel::ebug => "0.45";
 requires HTML::Prototype => 0;
diff -Nur ebug-http/lib/Devel/ebug/HTTP.pm ebug-http.new/lib/Devel/ebug/HTTP.pm
--- ebug-http/lib/Devel/ebug/HTTP.pm	2006-03-12 20:15:44.000000000 +0000
+++ ebug-http.new/lib/Devel/ebug/HTTP.pm	2007-10-13 16:49:51.000000000 +0000
@@ -1,7 +1,7 @@
 package Devel::ebug::HTTP;
 use strict;
 use warnings;
-use Catalyst qw/Static/;
+use Catalyst qw/Static::Simple/;
 #use Catalyst qw/-Debug Static/;
 use Catalyst::View::TT;
 use Cwd;
@@ -77,30 +77,6 @@
   $context->response->output($result);
 }
 
-sub css : Regex('(?i)\.(?:css)') {
-  my($self, $c) = @_;
-  $c->res->headers->header('Cache-Control' => 'max-age=60');
-  $c->serve_static("text/css");
-}
-
-sub js : Regex('(?i)\.(?:js)') {
-   my($self, $c) = @_;
-   $c->res->headers->header('Cache-Control' => 'max-age=60');
-   $c->serve_static("application/x-javascript");
-}
-
-sub ico : Regex('(?i)\.(?:ico)') {
-  my($self, $c) = @_;
-  $c->res->headers->header('Cache-Control' => 'max-age=60');
-  $c->serve_static("image/vnd.microsoft.icon");
-}
-
-sub images : Regex('(?i)\.(?:gif|jpg|png)') {
-  my($self, $c) = @_;
-  $c->res->headers->header('Cache-Control' => 'max-age=60');
-  $c->serve_static;
-}
-
 sub end : Private {
   my($self, $c) = @_;
   if ($c->stash->{template}) {