--- trunk/lib/Frey/Introspect.pm	2008/11/17 18:42:51	380
+++ trunk/lib/Frey/Introspect.pm	2008/11/17 19:08:31	381
@@ -257,13 +257,13 @@
 
 	my $html = {
 		title => $class,
-		body => join("\n"
-			, qq|<h1>$class</h1>|,
-			, qq|<div class="frey-introspect">$superclasses\n$roles\n$runnable\n|,
-			, ( $pod ? qq|<a href="#___top" title="Skip to POD" class="frey-skip">pod</a>| : '' )
-			, qq|<a href="#source" title="Skip to source" class="frey-skip">source</a>|
-			, qq|$table\n$pod\n</div>\n|
-			, qq|<h1>Source</h1><a name="source"></a><div class="frey-source">$source</div>|
+		body => join("\n",
+			qq|<h1>$class</h1>|,
+			qq|<div class="frey-introspect">$superclasses\n$roles\n$runnable\n|,
+			$pod    ? qq|<a class="frey-skip" href="#___top" title="Skip to POD"    >pod</a>|    : '',
+			$source ? qq|<a class="frey-skip" href="#source" title="Skip to source" >source</a>| : '',
+			qq|$table\n$pod\n</div>\n|,
+			qq|<h1>Source</h1><a name="source"></a><div class="frey-source">$source</div>|,
 		),
 	};