From f55630126c24542e7b90e1593cbd9ab2040088ca Mon Sep 17 00:00:00 2001 From: h677 Date: Wed, 23 Feb 2011 15:46:05 +0000 Subject: [PATCH] =?utf8?q?HAP=E5=89=8A=E9=99=A4=E7=94=A8=E3=81=AECookie?= =?utf8?q?=E3=82=92=E5=8F=97=E3=81=91=E4=BB=98=E3=81=91=E3=81=AA=E3=81=84?= =?utf8?q?=E3=82=88=E3=81=86=E3=81=AB=E4=BF=AE=E6=AD=A3?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- Editor.pas | 9 ++++++--- gikoNavi.res | Bin 4292 -> 4292 bytes readme/gikoUSetup.iss | 6 +++--- 3 files changed, 9 insertions(+), 6 deletions(-) diff --git a/Editor.pas b/Editor.pas index 99fa72a..a8a6381 100644 --- a/Editor.pas +++ b/Editor.pas @@ -1931,9 +1931,12 @@ begin ABoard.SPID := Cookie.Value; ABoard.Expires := GMTToLocalDateTime(Cookie.Expires); end else if ( Cookie.CookieName = VAL_HAP ) then begin - GikoSys.SetBoukenCookie(Cookie.Value, Cookie.Domain); - // –`Œ¯‚̏‘‚Ì•Û‘¶ - GikoSys.Setting.WriteBoukenSettingFile; + // HAPíœ—p‚ÌCookie‚ª”z•z‚³‚ê‚é‚̂ŁA—LŒøŠúŒÀ‚ðƒ`ƒFƒbƒN‚·‚é + if CompareDateTime(GMTToLocalDateTime(Cookie.Expires) ,Now) > 0 then begin + GikoSys.SetBoukenCookie(Cookie.Value, Cookie.Domain); + // –`Œ¯‚̏‘‚Ì•Û‘¶ + GikoSys.Setting.WriteBoukenSettingFile; + end; end else begin if Length( curCookies.Values[ Cookie.CookieName ] ) > 0 then begin // Šù‘¶’l‚Ì•t‚¯‘Ö‚¦ diff --git a/gikoNavi.res b/gikoNavi.res index 26590f2c81a125c0ab045c3479bd499bd6b23f2c..3c48b281bcea534dfbd7b6067ef0a858f17ede30 100644 GIT binary patch delta 28 kcmX@2ctml-8(vOrW(Ed321W+$$zOT@G8%6F%y*Fy0E5E`UjP6A delta 28 kcmX@2ctml-8(vN=W(Ed321W+0$zOT@G8%0D%y*Fy0E3+gTmS$7 diff --git a/readme/gikoUSetup.iss b/readme/gikoUSetup.iss index f011824..7018b39 100644 --- a/readme/gikoUSetup.iss +++ b/readme/gikoUSetup.iss @@ -14,12 +14,12 @@ DefaultDirName={pf}\gikonavi VersionInfoDescription=ƒMƒRƒiƒrƒZƒbƒgƒAƒbƒvƒvƒƒOƒ‰ƒ€ DefaultGroupName=ƒMƒRƒiƒr ; Ž©•ª‚̊‹«‚ɍ‡‚킹‚Ä‚­‚¾‚³‚¢ -SourceDir=G:\Release61 +SourceDir=G:\Release OutputDir=G:\InnoSetup\Output SetupIconFile="G:\gikoNaviSFX_102\MainIcon.ico" ; ƒMƒRƒiƒr‚̃o[ƒWƒ‡ƒ“‚É‚ ‚킹‚Ä‚­‚¾‚³‚¢ -VersionInfoVersion=1.61.1.801 -OutputBaseFilename=gikoNavi_b61_usetup +VersionInfoVersion=1.62.0.810 +OutputBaseFilename=gikoNavi_b62_810_usetup CreateUninstallRegKey=no [Tasks] -- 2.11.0