--- trunk/lib/Frey/Web.pm	2008/07/17 19:33:51	161
+++ trunk/lib/Frey/Web.pm	2008/09/09 23:14:31	183
@@ -35,15 +35,16 @@
 		$path =~ s!^/!!;
 		if ( $path =~ m/\.js$/ ) {
 			$out .= $self->_inline_path( $path ) ?
-				qq|<script type="text/javascript">| . read_file($path) . qq|</script>| :
+				qq|<!-- $path --><script type="text/javascript">\n| . read_file($path) . qq|\n</script>| :
 				qq|<script type="text/javascript" src="/$path"></script>|;
 		} elsif ( $path =~ m/\.css$/ ) {
 			$out .= $self->_inline_path( $path ) ?
-				qq|<style type="text/css">| . read_file( $path ) . qq|</style>| :
+				qq|<!-- $path --><style type="text/css">\n| . read_file( $path ) . qq|\n</style>| :
 				qq|<link type="text/css" rel="stylesheet" href="/$path" media="screen">|;
 		} else {
 			confess "don't know how to render $path";
 		}
+		$out .= "\n";
 	}
 	return $out;
 }
@@ -76,6 +77,17 @@
 
 our $reload_counter = 0;
 
+
+=head2 page
+
+  $self->page(
+  	title => 'page title',
+	head  => '<!-- optional head markup -->',
+	body  => '<b>Page Body</b>',
+  );
+
+=cut
+
 sub page {
 	my $self = shift;
 	my $a = {@_};