fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-10-04 13:20 UTC+0200 Viktor Szakats (harbour syenar.net)

Browse Source 
- tests/testtok.prg
    - deleted obsolete token test code

  * contrib/hbformat/hbfmtcls.prg
  * contrib/hbgd/tests/test_out.prg
  * contrib/hbhttpd/core.prg
  * contrib/hbmxml/tests/custom.prg
  * contrib/hbmxml/tests/testmxml.prg
  * contrib/hbnf/ftround.prg
  * contrib/hbpgsql/tpostgre.prg
  * contrib/hbtip/ftpcli.prg
  * extras/gfspell/spell.prg
  * extras/gtwvw/tests/ebtest7.prg
  * extras/hbvpdf/hbvpdf.prg
  * extras/hbvpdf/hbvpdft.prg
  * extras/httpsrv/cgifunc.prg
  * extras/httpsrv/session.prg
  * extras/httpsrv/uhttpd.prg
  * src/debug/dbgtmenu.prg
  * src/debug/debugger.prg
  * tests/db_brows.prg
  * tests/inherit.prg
  * tests/rto_tb.prg
  * tests/stripem.prg
  * utils/hbi18n/hbi18n.prg
    ! fixed/avoided != operator on strings
This commit is contained in:
Viktor Szakats
2012-10-04 11:22:13 +00:00
parent c0dc8c254d
commit 4c8277ea01
24 changed files with 159 additions and 166 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
harbour/extras/httpsrv/session.prg
View File

@@ -253,11 +253,10 @@ METHOD Start( cSID ) CLASS uhttpd_Session
// // Check whether the current request was referred to by
// // an external site which invalidates the previously found ID
// $url = parse_url($GLOBALS['HTTP_REFERER']);
// if (trim($url['host']) != $GLOBALS['SERVER_NAME']) {
// unset($session->id);
// $send_cookie = true;
// $define_sid = true;
// }
// IF !(trim($url['host']) == $GLOBALS['SERVER_NAME'])
// unset(session->id)
// send_cookie := .T.
// define_sid := .T.
ENDIF
// Do we have an existing session ID?
@@ -751,8 +750,8 @@ STATIC FUNCTION FT_ELAPSED(dStart, dEnd, cTimeStart, cTimeEnd)
dEnd := DATE()
ENDIF
iif( VALTYPE(cTimeStart) != 'C', cTimeStart := '00:00:00', )
iif( VALTYPE(cTimeEnd) != 'C', cTimeEnd := '00:00:00', )
iif( ! HB_ISSTRING(cTimeStart), cTimeStart := '00:00:00', )
iif( ! HB_ISSTRING(cTimeEnd) , cTimeEnd := '00:00:00', )
nTotalSec := (dEnd - dStart) * 86400 + ;
VAL(cTimeEnd) * 3600 + ;