Lines 86-92
sub js {
Link Here
|
86 |
|
86 |
|
87 |
$attributes->{src} = $url; |
87 |
$attributes->{src} = $url; |
88 |
|
88 |
|
89 |
return $self->tag('script', $attributes) . '</script>'; |
89 |
return $self->_tag('script', $attributes) . '</script>'; |
90 |
} |
90 |
} |
91 |
|
91 |
|
92 |
=head2 css |
92 |
=head2 css |
Lines 111-117
sub css {
Link Here
|
111 |
$attributes->{type} = 'text/css'; |
111 |
$attributes->{type} = 'text/css'; |
112 |
$attributes->{href} = $url; |
112 |
$attributes->{href} = $url; |
113 |
|
113 |
|
114 |
return $self->tag('link', $attributes); |
114 |
return $self->_tag('link', $attributes); |
115 |
} |
115 |
} |
116 |
|
116 |
|
117 |
=head2 url |
117 |
=head2 url |
Lines 149-164
sub url {
Link Here
|
149 |
} |
149 |
} |
150 |
} |
150 |
} |
151 |
|
151 |
|
152 |
=head2 tag |
152 |
=head2 _tag |
153 |
|
153 |
|
154 |
Returns an HTML tag with given name and attributes. |
154 |
Returns an HTML tag with given name and attributes. |
155 |
This shouldn't be used directly. |
155 |
This shouldn't be used directly. |
156 |
|
156 |
|
157 |
[% Asset.tag("script", { src = "/koha-tmpl/intranet-tmpl/prog/css/datatables.css" }) %] |
|
|
158 |
|
159 |
=cut |
157 |
=cut |
160 |
|
158 |
|
161 |
sub tag { |
159 |
sub _tag { |
162 |
my ($self, $name, $attributes) = @_; |
160 |
my ($self, $name, $attributes) = @_; |
163 |
|
161 |
|
164 |
my @attributes_strs; |
162 |
my @attributes_strs; |
165 |
- |
|
|