2009-04-30 18:49 UTC+0200 Francesco Saverio Giudice (info/at/fsgiudice.com)

* harbour/examples/httpsrv/uhttpd.prg
    * Added some hb_ToOutDebug() points garded from DEBUG_ACTIVE define
      for debugging purpose
  * harbour/examples/httpsrv/modules/showcounter.prg
  * harbour/examples/httpsrv/modules/tableservletdb.prg
    * fixed path for current directory
      as now define all _SERVER variables
  * harbour/examples/httpsrv/cookie.prg
    * fixed error on deleting cookie
This commit is contained in:
Francesco Saverio Giudice
2009-07-30 16:54:13 +00:00
parent b3e422d967
commit 3f6a3e9ec3
5 changed files with 71 additions and 23 deletions

View File

@@ -106,7 +106,7 @@ METHOD SetCookie( cCookieName, xValue, cDomain, cPath, cExpires, lSecure, lHttpO
::lHttpOnly := lHttpOnly
IF !Empty( xValue )
IF xValue != NIL
// Search if a cookie already exists
// case sensitive
IF ( nPos := aScan( ::aCookies, {|e| e[ 1 ] == cCookieName } ) ) > 0