Bläddra i källkod

Options changed

Artur Efimov 6 år sedan
förälder
incheckning
922ba8ccf7
1 ändrade filer med 2 tillägg och 2 borttagningar
  1. 2 2
      src/FreeOberon.Mod

+ 2 - 2
src/FreeOberon.Mod

@@ -979,8 +979,8 @@ VAR i, nofnames: INTEGER;
 BEGIN fs := TRUE; sw := FALSE; i := 0; nofnames := 0;
   WHILE i # Modules.ArgCount DO
     Modules.GetArg(i, s);
-    IF s = '-window' THEN fs := FALSE
-    ELSIF s = '-software' THEN sw := TRUE
+    IF s = '--window' THEN fs := FALSE
+    ELSIF s = '--software' THEN sw := TRUE
     ELSIF nofnames < LEN(fnames) THEN
       COPY(s, fnames[nofnames]); INC(nofnames)
     END;