mason/util/import_css.mas

   1 <%doc>
   2
   3 =head1 DESCRIPTION
   4
   5 Produces a list of <link rel="stylesheet" type="text/css" href=""/> lines for a set of
   6 CSS paths (relative to /static/css).
   7
   8 =head1 ARGS
   9
  10 =head2 C<paths> - an arrayref of paths to a css file relative to /static/css/, absolute paths, or urls.
  11
  12 =head1 EXAMPLE
  13
  14   <& /util/import_css.mas, paths => ['bootstrap/v1.css','/css/jquery.css','http://foo.bar/buzz.css'] &>
  15
  16 =cut
  17
  18 </%doc>
  19 <%args>
  20  $paths
  21 </%args>
  22 <%perl>
  23   $paths = [ $paths ] unless ref $paths; #< coerce to arrayref
  24   push @{ $c->stash->{css_paths} }, @$paths;
  25 </%perl>