[geeklog-cvs] geeklog-1.3/system lib-sessions.php,1.22,1.22.2.1

[dhaun at geeklog.net]

Update of /usr/cvs/geeklog/geeklog-1.3/system
In directory geeklog_prod:/tmp/cvs-serv13491

Modified Files:
      Tag: geeklog_1_3_8_1_1
	lib-sessions.php 
Log Message:
When trying to guess the value for $_CONF['cookiedomain'], take out the port number, if there is one in the URL (bug #75).


Index: lib-sessions.php
===================================================================
RCS file: /usr/cvs/geeklog/geeklog-1.3/system/lib-sessions.php,v
retrieving revision 1.22
retrieving revision 1.22.2.1
diff -C2 -d -r1.22 -r1.22.2.1
*** lib-sessions.php	22 Jun 2003 15:47:13 -0000	1.22
--- lib-sessions.php	12 Oct 2003 08:21:51 -0000	1.22.2.1
***************
*** 43,47 ****
  
  if (empty ($_CONF['cookiedomain'])) {
!     preg_match ("/\/\/([^\/]*)/", $_CONF['site_url'], $server);
      if (substr ($server[1], 0, 4) == 'www.') {
          $_CONF['cookiedomain'] = substr ($server[1], 3);
--- 43,47 ----
  
  if (empty ($_CONF['cookiedomain'])) {
!     preg_match ("/\/\/([^\/:]*)/", $_CONF['site_url'], $server);
      if (substr ($server[1], 0, 4) == 'www.') {
          $_CONF['cookiedomain'] = substr ($server[1], 3);
***************
*** 362,366 ****
          }
      } else {
!         return $row[uid];
      }
  }
--- 362,366 ----
          }
      } else {
!         return $row['uid'];
      }
  }