--- 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)$/ ) {