Explorar o código

* allow -l-

git-svn-id: trunk@8382 -
peter %!s(int64=18) %!d(string=hai) anos
pai
achega
8c24a15e26
Modificáronse 1 ficheiros con 1 adicións e 3 borrados
  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);