|
Lines 88-96
subtest 'Testing themelanguage for unique themes (BZ 17982)' => sub {
Link Here
|
| 88 |
# trigger bad case. |
88 |
# trigger bad case. |
| 89 |
$template = $htdocs . '/prog/en/kaboom/about.tt'; |
89 |
$template = $htdocs . '/prog/en/kaboom/about.tt'; |
| 90 |
($theme, $lang, $availablethemes) = C4::Templates::themelanguage($htdocs, $template, $section, $cgi); |
90 |
($theme, $lang, $availablethemes) = C4::Templates::themelanguage($htdocs, $template, $section, $cgi); |
| 91 |
is($theme,'1',"Expected strange theme: not coded for - $theme"); |
|
|
| 92 |
is($lang,undef,'Expected language: not coded for'); |
91 |
is($lang,undef,'Expected language: not coded for'); |
| 93 |
is( $availablethemes, undef, 'We only expect no prog: not coded for' ); |
92 |
is( $availablethemes, undef, 'We only expect no prog: not coded for' ); |
|
|
93 |
is($theme,undef,"Expected no theme: not coded for"); |
| 94 |
|
94 |
|
| 95 |
return; |
95 |
return; |
| 96 |
}; |
96 |
}; |
| 97 |
- |
|
|