[Guile-commits] GNU Guile branch, master, updated. release_1-9-4-129-gb9fd657

[Ken Raeburn]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=b9fd657add26c7936fdfda80fc382630181cb113

The branch, master has been updated
       via  b9fd657add26c7936fdfda80fc382630181cb113 (commit)
      from  b10d93309b4c96caa5d399716c9b09a862c8ce0e (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit b9fd657add26c7936fdfda80fc382630181cb113
Author: Ken Raeburn <address@hidden>
Date:   Sat Nov 14 14:53:46 2009 -0500

    Fix off-by-one error in processing Emacs-style coding declaration.
    
    * libguile/read.c (scm_i_scan_for_encoding): Don't copy the first
      character after the coding declaration into the new string.

-----------------------------------------------------------------------

Summary of changes:
 libguile/read.c |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/libguile/read.c b/libguile/read.c
index e403cc3..775612a 100644
--- a/libguile/read.c
+++ b/libguile/read.c
@@ -1513,7 +1513,7 @@ scm_i_scan_for_encoding (SCM port)
   if (i == 0)
     return NULL;
 
-  encoding = scm_gc_strndup (pos, i + 1, "encoding");
+  encoding = scm_gc_strndup (pos, i, "encoding");
   for (i = 0; i < strlen (encoding); i++)
     encoding[i] = toupper ((int) encoding[i]);
 


hooks/post-receive
-- 
GNU Guile