オープンソース・ソフトウェアの開発とダウンロード

Subversion リポジトリの参照

Diff of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 6033 by maya, Tue Sep 1 15:03:10 2015 UTC revision 6034 by maya, Sat Sep 26 07:24:43 2015 UTC
# Line 499  var Line 499  var
499    FileDir       : String;    FileDir       : String;
500    TCPPort       : integer;    TCPPort       : integer;
501    ViewlogEditor : String;    ViewlogEditor : String;
502      CipherOrder   : String;
503    
504  begin  begin
505    Language       := GetIniString('Tera Term', 'Language', '', iniFile);    Language       := GetIniString('Tera Term', 'Language', '', iniFile);
# Line 509  begin Line 510  begin
510    FileDir        := GetIniString('Tera Term', 'FileDir', '', iniFile);    FileDir        := GetIniString('Tera Term', 'FileDir', '', iniFile);
511    TCPPort        := GetIniInt('Tera Term', 'TCPPort', 0, 0, 65535, iniFile)    TCPPort        := GetIniInt('Tera Term', 'TCPPort', 0, 0, 65535, iniFile)
512    ViewlogEditor  := GetIniString('Tera Term', 'ViewlogEditor', '', iniFile);    ViewlogEditor  := GetIniString('Tera Term', 'ViewlogEditor', '', iniFile);
513      CipherOrder    := GetIniString('TTSSH', 'CipherOrder', '', iniFile);
514    
515    case GetUILanguage and $3FF of    case GetUILanguage and $3FF of
516    $04: // Chinese    $04: // Chinese
# Line 643  begin Line 645  begin
645      SetIniString('Tera Term', 'ViewlogEditor', ViewlogEditor, iniFile);      SetIniString('Tera Term', 'ViewlogEditor', ViewlogEditor, iniFile);
646    end;    end;
647    
648      if IsComponentSelected('TTSSH') then
649        begin
650          CipherOrder := GetIniString('TTSSH', 'CipherOrder', '', iniFile);
651          if (CompareStr(CipherOrder, 'K>H:J=G9I<F8C7D;A@?EB3062') = 0) or
652             (CompareStr(CipherOrder, '>:=9<8C7D;A@?EB3062') = 0) or
653             (CompareStr(CipherOrder, '>:=9<87;A@?B3026') = 0) or
654             (CompareStr(CipherOrder, '>:=9<87;A@?3026') = 0) or
655             (CompareStr(CipherOrder, '>:=9<87;?3026') = 0) or
656             (CompareStr(CipherOrder, '<8=9>:7;3026') = 0) or
657             (CompareStr(CipherOrder, '87;9:<=>3026') = 0) or
658             (CompareStr(CipherOrder, '87;9:3026') = 0) or
659             (CompareStr(CipherOrder, '873026') = 0) then
660            SetIniString('TTSSH', 'CipherOrder', 'K>H:J=G9I<F8C7D;EB30A@?62', iniFile)
661        end;
662    
663  end;  end;
664    
665  procedure InitializeWizard;  procedure InitializeWizard;

Legend:
Removed from v.6033  
changed lines
  Added in v.6034

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26