소스 검색

* allow -l-

git-svn-id: trunk@8382 -
peter 18 년 전
부모
커밋
8c24a15e26
1개의 변경된 파일1개의 추가작업 그리고 3개의 파일을 삭제
  1. 1 3
      compiler/options.pas

+ 1 - 3
compiler/options.pas

@@ -907,10 +907,8 @@ begin
                else
                  IllegalPara(opt);
              end;
-
            'l' :
-             if not UnSetBool(more,0) then
-               ParaLogo:=true;
+               ParaLogo:=UnSetBool(more,0);
 
            'm' :
              parapreprocess:=not UnSetBool(more,0);