svnno****@sourc*****
svnno****@sourc*****
2013年 11月 26日 (火) 20:47:30 JST
Revision: 5442 http://sourceforge.jp/projects/ttssh2/scm/svn/commits/5442 Author: maya Date: 2013-11-26 20:47:30 +0900 (Tue, 26 Nov 2013) Log Message: ----------- アンインストーラで lang\Default.lng をユーザに問い合わせて削除するようにした Modified Paths: -------------- trunk/installer/teraterm.iss -------------- next part -------------- Modified: trunk/installer/teraterm.iss =================================================================== --- trunk/installer/teraterm.iss 2013-11-26 11:41:37 UTC (rev 5441) +++ trunk/installer/teraterm.iss 2013-11-26 11:47:30 UTC (rev 5442) @@ -784,7 +784,7 @@ procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); var - ini : array[0..4] of String; + ini : array[0..5] of String; buf : String; conf : String; confmsg : String; @@ -796,15 +796,16 @@ begin ini[0] := '\TERATERM.INI'; ini[1] := '\KEYBOARD.CNF'; - ini[2] := '\ssh_known_hosts'; - ini[3] := '\cygterm.cfg'; - ini[4] := '\broadcast.log'; + ini[2] := '\lang\Default.lng'; + ini[3] := '\ssh_known_hosts'; + ini[4] := '\cygterm.cfg'; + ini[5] := '\broadcast.log'; conf := CustomMessage('msg_del_confirm'); app := ExpandConstant('{app}'); // delete config files - for i := 0 to 4 do + for i := 0 to 5 do begin buf := app + ini[i]; if FileExists(buf) then begin