|
Lines 213-219
sub badtemplatecheck {
Link Here
|
| 213 |
|
213 |
|
| 214 |
sub gettemplate { |
214 |
sub gettemplate { |
| 215 |
my ( $tmplbase, $interface, $query ) = @_; |
215 |
my ( $tmplbase, $interface, $query ) = @_; |
| 216 |
($query) or warn "no query in gettemplate"; |
|
|
| 217 |
my ($htdocs, $theme, $lang, $filename) |
216 |
my ($htdocs, $theme, $lang, $filename) |
| 218 |
= _get_template_file($tmplbase, $interface, $query); |
217 |
= _get_template_file($tmplbase, $interface, $query); |
| 219 |
badtemplatecheck( $filename ); # single trip for bad templates |
218 |
badtemplatecheck( $filename ); # single trip for bad templates |
|
Lines 273-279
the use case where the DB is not populated already when rewriting/fixing.
Link Here
|
| 273 |
|
272 |
|
| 274 |
sub themelanguage { |
273 |
sub themelanguage { |
| 275 |
my ($htdocs, $tmpl, $interface, $query) = @_; |
274 |
my ($htdocs, $tmpl, $interface, $query) = @_; |
| 276 |
($query) or warn "no query in themelanguage"; |
|
|
| 277 |
|
275 |
|
| 278 |
# Select a language based on cookie, syspref available languages & browser |
276 |
# Select a language based on cookie, syspref available languages & browser |
| 279 |
my $lang = C4::Languages::getlanguage($query); |
277 |
my $lang = C4::Languages::getlanguage($query); |
| 280 |
- |
|
|