function geoipLanguageTestCase::testDefaultLanguageNegotiation in GeoIP API 6
Same name and namespace in other branches
- 7 geoip_language/geoip_language.test \geoipLanguageTestCase::testDefaultLanguageNegotiation()
File
- geoip_language/geoip_language.test, line 94
- Test suite for geoip_language.module
Class
- geoipLanguageTestCase
- @file
Test suite for geoip_language.module
Code
function testDefaultLanguageNegotiation() {
global $base_url, $base_path;
$languages = language_list('language', TRUE);
$this
->drupalGet($base_url . $base_path . 'node?geoip_debug=140.211.166.6');
$url = url('node', array(
'absolute' => TRUE,
'language' => $languages['en'],
));
$this
->assertEqual($this
->getUrl(), $url, t('Redirect to default language (%url).', array(
'%url' => $this
->getUrl(),
)));
$this
->drupalGet('node', array(
'language' => $languages['fr'],
));
$url = url('node', array(
'absolute' => TRUE,
'language' => $languages['fr'],
));
$this
->assertEqual($this
->getUrl(), $url, t('No redirect for non-default language (%url).', array(
'%url' => $this
->getUrl(),
)));
$this
->drupalGet($base_url . $base_path . 'node');
$url = url('node', array(
'absolute' => TRUE,
'language' => $languages['fr'],
));
$this
->assertEqual($this
->getUrl(), $url, t('Redirect to the language stored in the session (%url).', array(
'%url' => $this
->getUrl(),
)));
$this
->drupalGet('node', array(
'language' => $languages['en'],
));
$url = url('node', array(
'absolute' => TRUE,
'language' => $languages['en'],
));
$this
->assertEqual($this
->getUrl(), $url, t('No redirect for default language prefix (%url).', array(
'%url' => $this
->getUrl(),
)));
}