--- trunk/lib/Frey/Web.pm 2008/11/19 01:37:49 439 +++ trunk/lib/Frey/Web.pm 2008/11/19 02:52:42 444 @@ -81,6 +81,8 @@ $out .= $self->_inline_path( $path ) ? qq|| : qq||; + } elsif ( $path =~ m{<.+>} ) { + $out .= $path; } else { confess "don't know how to render $path"; } @@ -102,17 +104,19 @@ return if ! defined $path || $path eq ''; $path =~ s!^/!!; - if ( -e $path ) { + if ( $path =~ m{<.*>} ) { + push @{ $self->head }, $path; + } elsif ( -e $path ) { if ( $path =~ m/\.(?:js|css)$/ ) { push @{ $self->head }, $path; } else { confess "can't add_head( $path ) it's not js or css"; } + return -s $path; } else { confess "can't find $path: $!"; } - return -s $path; } our $reload_counter = 0;