Subversion Repositories personal-webbase

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 daniel-mar 1
<?php
2
 
3
if (!defined('WBLEGAL')) die('Kann nicht ohne Personal WebBase ausgef&uuml;hrt werden.');
4
 
5
if ((isset($_SERVER['HTTP_HOST'])) && (isset($_SERVER['PHP_SELF'])))
6
{
7
        if ($WBConfig->getForceSSLFlag())
8
        {
9
                $wburl = 'https://';
10
        }
11
        else
12
        {
13
                $wburl = 'http://';
14
        }
15
        $wburl .= $_SERVER['HTTP_HOST'];
16
        $wburl .= dirname_with_pathdelimiter($_SERVER['PHP_SELF']);
17
}
18
else
19
{
20
        $wburl = '';
21
}
22
 
23
if (isset($configuration[$m2]['wb_system_url']))
24
{
25
        if ($configuration[$m2]['wb_system_url'] != $wburl)
26
        {
27
                wb_change_config('wb_system_url', $wburl, $m2);
28
        }
29
}
30
else
31
{
32
        wb_add_config('wb_system_url', $wburl, $m2);
33
}
34
 
35
unset($wburl);
36
 
37
?>