~ chicken-core (chicken-5) b2602444d4baf5dda38c465112917ec4dedc3e14
commit b2602444d4baf5dda38c465112917ec4dedc3e14 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Tue Aug 30 21:24:19 2011 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Tue Aug 30 21:24:19 2011 +0200 file-copy opens files in binary mode (thanks to satori) diff --git a/files.scm b/files.scm index 1ca5c3f5..2c2eb15c 100644 --- a/files.scm +++ b/files.scm @@ -86,8 +86,8 @@ EOF newfile))) (when (directory-exists? origfile) (##sys#error 'file-copy "can not copy directories" origfile)) - (let* ((i (open-input-file origfile)) - (o (open-output-file newfile)) + (let* ((i (open-input-file origfile #:binary)) + (o (open-output-file newfile #:binary)) (s (make-string blocksize))) (let loop ((d (read-string! blocksize s i)) (l 0)) diff --git a/manual/Acknowledgements b/manual/Acknowledgements index 46e7c668..824c80c0 100644 --- a/manual/Acknowledgements +++ b/manual/Acknowledgements @@ -38,8 +38,8 @@ Post, "Pupeno", Davide Puricelli, "presto", Doug Quale, Imran Rafique, Eric Raible, Ivan Raikov, Santosh Rajan, Joel Reymont, Chris Roberts, Eric Rochester, Paul Romanchenko, Andreas Rottman, David Rush, Lars Rustemeier, Daniel Sadilek, Otavio Salvador, Burton Samograd, -"Sandro", Aleksej Saushev, Oskar Schirmer, Reed Sheridan, Ronald -Schroeder, Spencer Schumann, Ivan Shcheklein, Alex Shinn, Ivan +"Sandro", "satori", Aleksej Saushev, Oskar Schirmer, Reed Sheridan, +Ronald Schroeder, Spencer Schumann, Ivan Shcheklein, Alex Shinn, Ivan Shmakov, "Shmul", Tony Sidaway, Jeffrey B. Siegal, Andrey Sidorenko, Michele Simionato, Iruata Souza, Volker Stolz, Jon Strait, Dorai Sitaram, Robert Skeels, Jason Songhurst, Clifford Stein, DavidTrap