diff options
Diffstat (limited to 'test-suite/tests/reader.test')
| -rw-r--r-- | test-suite/tests/reader.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/test-suite/tests/reader.test b/test-suite/tests/reader.test index 6e02255ad..e1fe22dad 100644 --- a/test-suite/tests/reader.test +++ b/test-suite/tests/reader.test @@ -1,6 +1,7 @@ ;;;; reader.test --- Reader test. -*- coding: iso-8859-1; mode: scheme -*- ;;;; -;;;; Copyright (C) 1999, 2001, 2002, 2003, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. +;;;; Copyright (C) 1999, 2001, 2002, 2003, 2007, 2008, 2009, 2010, 2011, +;;;; 2013 Free Software Foundation, Inc. ;;;; Jim Blandy <jimb@red-bean.com> ;;;; ;;;; This library is free software; you can redistribute it and/or @@ -47,8 +48,7 @@ (define (read-string s) - (with-fluids ((%default-port-encoding #f)) - (with-input-from-string s (lambda () (read))))) + (with-input-from-string s (lambda () (read)))) (define (with-read-options opts thunk) (let ((saved-options (read-options))) |