소스 검색

* initialization of targets fixed

Tomas Hajny 20 년 전
부모
커밋
e759cda9e6
1개의 변경된 파일5개의 추가작업 그리고 2개의 파일을 삭제
  1. 5 2
      ide/fpswitch.pas

+ 5 - 2
ide/fpswitch.pas

@@ -931,7 +931,7 @@ begin
      { better, we've a correct target list without "tilded" names instead a wrong one }
      for t:=low(tsystem) to high(tsystem) do
        if assigned(targetinfos[t]) then
-         AddSelectItem(targetinfos[t]^.name,targetinfos[t]^.shortname,idNone);
+         AddSelectItem(targetinfos[t]^.name, LowerCaseStr (targetinfos[t]^.shortname),idNone);
    end;
   New(AsmReaderSwitches,InitSelect('R'));
   with AsmReaderSwitches^ do
@@ -1212,7 +1212,10 @@ end;
 end.
 {
   $Log$
-  Revision 1.22  2005-02-14 17:13:18  peter
+  Revision 1.23  2005-05-15 19:22:13  hajny
+    * initialization of targets fixed
+
+  Revision 1.22  2005/02/14 17:13:18  peter
     * truncate log
 
 }