--- trunk/lib/Frey/Web.pm 2008/11/19 02:52:42 444 +++ trunk/lib/Frey/Web.pm 2008/11/19 03:11:11 446 @@ -1,8 +1,6 @@ package Frey::Web; use Moose::Role; -#with 'Frey::Escape'; - use Frey::Types; use Continuity::Widget::DomNode; @@ -81,7 +79,7 @@ $out .= $self->_inline_path( $path ) ? qq|| : qq||; - } elsif ( $path =~ m{<.+>} ) { + } elsif ( $path =~ m{<.+>}s ) { $out .= $path; } else { confess "don't know how to render $path"; @@ -97,6 +95,8 @@ my $size = $o->add_head( 'path/to/external.css' ); + $o->add_head( '' ); + =cut sub add_head { @@ -104,7 +104,7 @@ return if ! defined $path || $path eq ''; $path =~ s!^/!!; - if ( $path =~ m{<.*>} ) { + if ( $path =~ m{<.*>}s ) { push @{ $self->head }, $path; } elsif ( -e $path ) { if ( $path =~ m/\.(?:js|css)$/ ) {