Kill warnings

[catagits/Gitalist.git] / lib / Gitalist / Controller / Root.pm

diff --git a/lib/Gitalist/Controller/Root.pm b/lib/Gitalist/Controller/Root.pm
index 38f792c..9d951d4 100644 (file)
--- a/lib/Gitalist/Controller/Root.pm
+++ b/lib/Gitalist/Controller/Root.pm
@@ -385,6 +385,9 @@ sub auto : Private {
       $line =~ s/^(.{70,80}\b).*/$1 …/;
       return $line;
     },
+    abridged_description => sub {
+        join(' ', grep { defined } (split / /, shift)[0..10]);
+    },
   );
 
   # Yes, this is hideous.