X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FGitalist%2FController%2FRoot.pm;h=42896ea447d793043e6f9533af191ec426ea4a67;hb=eb8ee28a1c14382122949c6dcc09bc3ee6a08310;hp=7b921f89281b3f141c6b161b78396d771b39c1d8;hpb=b1c8b22c3db33682673723c1400f8b8c08bcc9a3;p=catagits%2FGitalist.git diff --git a/lib/Gitalist/Controller/Root.pm b/lib/Gitalist/Controller/Root.pm index 7b921f8..42896ea 100644 --- a/lib/Gitalist/Controller/Root.pm +++ b/lib/Gitalist/Controller/Root.pm @@ -3,7 +3,7 @@ package Gitalist::Controller::Root; use Moose; use Moose::Autobox; use Digest::MD5 qw(md5_hex); -use Gitalist::Utils qw/ age_string /; +use Gitalist::Utils qw/ age_string mode_string /; use namespace::autoclean; @@ -54,6 +54,9 @@ sub base : Chained('/root') PathPart('') CaptureArgs(0) { $uri .= "?s=$size" if $size; return $uri; }, + mode_string => sub { + return mode_string(oct shift); + } ); }