Prechádzať zdrojové kódy

* remove forgotten writeln in base64 (* please merge me! *)

git-svn-id: trunk@7451 -
Almindor 18 rokov pred
rodič
commit
2b873af182
1 zmenil súbory, kde vykonal 1 pridanie a 1 odobranie
  1. 1 1
      packages/fcl-base/src/inc/base64.pp

+ 1 - 1
packages/fcl-base/src/inc/base64.pp

@@ -239,7 +239,7 @@ begin
             Break;
         end;
       until count = 0;
-      writeln(Result);
+      // writeln(Result);
       // we are now either at the end of the stream, or encountered our first '=', stored in c
       if c = '=' then begin // '=' found
         if Result mod 4 <= 1 then // badly placed '=', disregard last block