X-Git-Url: http://git.rot13.org/?p=sysadmin-cookbook-html;a=blobdiff_plain;f=bin%2Fhtml.pl;fp=bin%2Fhtml.pl;h=f2478560f8e61fc0f830a6a8330f2803109f5edf;hp=701838dd75d9ef2fe0643209cc6e13014d72f577;hb=417e31317258b1aaeeeb043c3b11581a75feaec8;hpb=f730fa97574963318b6d1eca186549f4d7894c47

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>|
 		;
 }