瀏覽代碼

* 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);