瀏覽代碼

fix links

George S. Baugh 5 年之前
父節點
當前提交
fa78ce9a36
共有 1 個文件被更改,包括 8 次插入0 次删除
  1. 8 0
      routes.pm

+ 8 - 0
routes.pm

@@ -55,6 +55,14 @@ our %routes = (
         method   => 'GET',
         callback => sub {Trog::Routes::HTML::redirect_permanent('/themes/houston.pm/styles/houston.css') },
     },
+    '/talks/(.*)' => {
+        method   => 'GET',
+        callback => sub {
+            my ($query) = @_;
+            Trog::Routes::HTML::redirect_permanent("/assets/talks/$query->{fragment}")
+        },
+        captures => ['fragment'],
+    },
 );
 
 my $processor = Text::Xslate->new(