* use faster method for loading files by default

ide/fp.pas

@@ -171,7 +171,7 @@ begin
          { 'M' : TryToMaximizeScreen:=true;}
 {$endif fpc}
 {$ifdef DEBUG}
-          'Z' : UseFastBufStreamMethod:=true;
+          'Z' : UseOldBufStreamMethod:=true;
           'X' : CloseImmediately:=true;
 {$endif DEBUG}
         end;
@@ -470,7 +470,10 @@ BEGIN
 END.
 {
   $Log$
-  Revision 1.12  2002-09-09 06:59:16  pierre
+  Revision 1.13  2002-09-10 12:19:14  pierre
+   * use faster method for loading files by default
+
+  Revision 1.12  2002/09/09 06:59:16  pierre
    * new debug options added
 
   Revision 1.11  2002/09/07 15:40:41  peter

ide/fpvars.pas

@@ -43,7 +43,7 @@ const ClipboardWindow  : PClipboardWindow = nil;
       TabsPattern      : string{$ifdef GABOR}[40]{$endif} = 'make*;make*.*';
       SourceDirs       : string{$ifdef GABOR}[40]{$endif} = '';
       StandardUnits    : string{$ifdef GABOR}[40]{$endif} = '';
-      UseStandardUnitsInCodeComplete : boolean = true;
+      UseStandardUnitsInCodeComplete : boolean = false;
       UseAllUnitsInCodeComplete : boolean = true;
       ShowOnlyUnique   : boolean = true;
       PrimaryFile      : string{$ifdef GABOR}[60]{$endif} = '';
@@ -116,7 +116,10 @@ implementation
 END.
 {
   $Log$
-  Revision 1.5  2002-09-07 15:40:46  peter
+  Revision 1.6  2002-09-10 12:19:14  pierre
+   * use faster method for loading files by default
+
+  Revision 1.5  2002/09/07 15:40:46  peter
     * old logs removed and tabs fixed
 
   Revision 1.4  2002/09/04 14:06:36  pierre

ide/weditor.pas

@@ -6635,7 +6635,7 @@ begin
    begin
      while OK and (eofstream(Stream)=false) and (GetLineCount<MaxLineCount) do
        begin
-         if UseFastBufStreamMethod then
+         if not UseOldBufStreamMethod then
            Stream^.Readline(S,LineComplete,hasCR)
          else
            ReadlnFromStream(Stream,S,LineComplete,hasCR);
@@ -7116,7 +7116,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.30  2002-09-09 06:58:28  pierre
+  Revision 1.31  2002-09-10 12:19:14  pierre
+   * use faster method for loading files by default
+
+  Revision 1.30  2002/09/09 06:58:28  pierre
    + FastBufStream.readline method added
 
   Revision 1.29  2002/09/07 15:40:48  peter

ide/wutils.pas

@@ -190,7 +190,7 @@ const LastStrToIntResult : integer = 0;
       LastStrToCardResult : integer = 0;
       LastHexToCardResult : integer = 0;
       DirSep             : char    = {$ifdef Unix}'/'{$else}'\'{$endif};
-      UseFastBufStreamMethod : boolean = false;
+      UseOldBufStreamMethod : boolean = false;
 
 procedure RegisterWUtils;
 
@@ -1362,7 +1362,10 @@ BEGIN
 END.
 {
   $Log$
-  Revision 1.13  2002-09-09 06:58:27  pierre
+  Revision 1.14  2002-09-10 12:19:14  pierre
+   * use faster method for loading files by default
+
+  Revision 1.13  2002/09/09 06:58:27  pierre
    + FastBufStream.readline method added
 
   Revision 1.12  2002/09/07 15:40:50  peter