X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=tools%2FPM-Pod2html-snippet.pl;h=d45d28db8e4d35057991f766417d965e445c0061;hb=3065276381925b3e87e7851f9a52df76064b9916;hp=52187f8eef0b52a068c0f46d04a4e4e7b3489f06;hpb=12f774aca5734b5cf89cf9d0096d33d830b5bc68;p=sdlgit%2FSDL-Site.git

diff --git a/tools/PM-Pod2html-snippet.pl b/tools/PM-Pod2html-snippet.pl
index 52187f8..d45d28d 100644
--- a/tools/PM-Pod2html-snippet.pl
+++ b/tools/PM-Pod2html-snippet.pl
@@ -180,11 +180,15 @@ sub node
 	if($self->SUPER::type() eq 'page')
 	{
 		my $page = $self->SUPER::page();
+		my $suff = '';
 		
 		if($page =~ /^SDL\b/)
 		{
-			$page =~ s/::/-/;
-			return "/$page.html";
+			$page =~ s/::([A-Z]+)/-$1/g;
+			$page =~ s/(.*)::(.*)/\/$1.html#$2/;
+			$page .= '.html' unless $page =~ /\.html/;
+			
+			return $page;
 		}
 		else
 		{