# HG changeset patch
# User Bryan O'Sullivan <bos@serpentine.com>
# Date 1156271099 25200
# Node ID e75fdc37100ce6af485f78e415749369ce7aeb08
# Parent  e1762867a7343d53744a9b97c4b3bcb4364f6489
mercurial.el: fix hg-chomp.

diff -r e1762867a734 -r e75fdc37100c contrib/mercurial.el
--- a/contrib/mercurial.el	Tue Aug 22 08:54:19 2006 -0700
+++ b/contrib/mercurial.el	Tue Aug 22 11:24:59 2006 -0700
@@ -289,7 +289,7 @@
 
 (defsubst hg-chomp (str)
   "Strip trailing newlines from a string."
-  (hg-replace-in-string str "[\r\n]+\'" ""))
+  (hg-replace-in-string str "[\r\n]+\\'" ""))
 
 (defun hg-run-command (command &rest args)
   "Run the shell command COMMAND, returning (EXIT-CODE . COMMAND-OUTPUT).