wp_guess_url() and install styling fixes from sambauers. fixes #7129 see #4732

git-svn-id: https://develop.svn.wordpress.org/trunk@8182 602fd350-edb4-49c9-b593-d223f7449a82
This commit is contained in:
Ryan Boren
2008-06-24 17:36:21 +00:00
parent 0194deef72
commit ce2dafe0e5
4 changed files with 19 additions and 11 deletions

View File

@@ -21,12 +21,7 @@ function wp_install($blog_title, $user_name, $user_email, $public, $remote) {
update_option('enable_app',$remote);
update_option('enable_xmlrpc',$remote);
$schema = ( isset($_SERVER['HTTPS']) && strtolower($_SERVER['HTTPS']) == 'on' ) ? 'https://' : 'http://';
if ( defined('WP_SITEURL') && '' != WP_SITEURL )
$guessurl = WP_SITEURL;
else
$guessurl = preg_replace('|/wp-admin/.*|i', '', $schema . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI']);
$guessurl = wp_guess_url();
update_option('siteurl', $guessurl);