[SCM] emacs-jabber branch, master, updated. a034d4b330d23643169880e96e34e0cf61b76a11

[Magnus H. <leg...@us...>]

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 "emacs-jabber".

The branch, master has been updated
       via  a034d4b330d23643169880e96e34e0cf61b76a11 (commit)
      from  dc9fc0fa06ff8a18b5599572671ce598374aa83c (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 a034d4b330d23643169880e96e34e0cf61b76a11
Author: Jeremy Compostella <je...@Ap...>
Date:   Thu Dec 15 22:31:34 2011 +0100

    jabber-core: Fix header parsing
    
    The (1+ (match-end 0)) is a mistake. Indeed, after the replace-match
    call the (match-end 0) point has changed to be at the end of the
    replaced string. So calling (point) is more than enough.
    
    Signed-off-by: Magnus Henoch <leg...@us...>

diff --git a/AUTHORS b/AUTHORS
index 4f60098..8e5c201 100644
--- a/AUTHORS
+++ b/AUTHORS
@@ -7,6 +7,7 @@ Evgenii Terechkov
 
 Contributors:
 Anthony Chaumas-Pellet
+Jérémy Compostella
 Mathias Dahl
 Mario Domenech Goulart
 Nolan Eakins
diff --git a/jabber-core.el b/jabber-core.el
index 21d0d96..8b558a8 100644
--- a/jabber-core.el
+++ b/jabber-core.el
@@ -858,8 +858,7 @@ DATA is any sexp."
 	 ;; Let's pretend that the stream header is a closed tag,
 	 ;; and parse it as such.
 	 (replace-match "/>" t t nil 1)
-	 (let* (;; Thus we need to add one to the index...
-		(ending-at (1+ (match-end 0)))
+	 (let* ((ending-at (point))
 		(stream-header (car (xml-parse-region (point-min) ending-at)))
 		(session-id (jabber-xml-get-attribute stream-header 'id))
 		(stream-version (jabber-xml-get-attribute stream-header 'version)))

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

Summary of changes:
 AUTHORS        |    1 +
 jabber-core.el |    3 +--
 2 files changed, 2 insertions(+), 2 deletions(-)


hooks/post-receive
-- 
emacs-jabber