mason/util/import_javascript.mas

   1 <%doc>
   2
   3 =head1 DESCRIPTION
   4
   5 Produces a list of <script src=""></script> lines for a set of
   6 legacy JavaScript modules or legacy JSAN class names, including any necessary dependencies.
   7
   8 =head1 ARGS
   9
  10 =head2 C<entries> - single class name, or arrayref of JavaScript entry modules to import
  11
  12 =head1 EXAMPLES
  13
  14   <& /import_javascript, entries => [], legacy => [] &>
  15
  16 =cut
  17
  18 </%doc>
  19 <%args>
  20  $entries => []
  21  $classes => []
  22  $legacy => []
  23 </%args>
  24 <%perl>
  25   $legacy = [ $legacy ] unless ref $legacy;
  26   $classes = [ $classes ] unless ref $classes; #< coerce to arrayref
  27   push @$legacy, @$classes;
  28   push @{ $c->stash->{jsan_classes} }, @$legacy;
  29
  30   $entries = [ $entries ] unless ref $entries; #< coerce to arrayref
  31   push @{ $c->stash->{js_modules} }, @$entries;
  32 </%perl>