From 417e31317258b1aaeeeb043c3b11581a75feaec8 Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Sat, 1 May 2010 12:53:41 +0000
Subject: [PATCH] link to .pl files

git-svn-id: file:///home/dpavlin/private/svn/sysadmin-cookbook-html@13 3e18072f-9615-4e06-9d3a-648eafba3f8d
---
 bin/html.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/html.pl b/bin/html.pl
index 701838d..f247856 100755
--- a/bin/html.pl
+++ b/bin/html.pl
@@ -43,7 +43,7 @@ sub file {
 	$path =~ s{^$recepies/*(.*?[^/]+)$}{$1} || next;
 	return ''
 		. qq|<ul class=changes>$changes</ul>|
-		. ( $path =~ m{(\.sh|Makefile|\.conf)$}i ? qq|<a class="path" href="$svn/view/recepies/$path">$path</a>| : '' )
+		. ( $path =~ m{(\.sh|Makefile|\.conf|\.pl)$}i || -e $path ? qq|<a class="path" href="$svn/view/recepies/$path">$path</a>| : '' )
 		. qq|<pre class=content>$content</pre>|
 		;
 }
-- 
2.20.1