Fixed.

[riece] / lisp / riece-url.el

diff --git a/lisp/riece-url.el b/lisp/riece-url.el
index 73c7e02..c502328 100644 (file)
--- a/lisp/riece-url.el
+++ b/lisp/riece-url.el
@@ -51,7 +51,7 @@ For example:
         '((\"\\\\bBug#\\\\([0-9]+\\\\)\\\\b\" .
            \"http://bugs.debian.org/\\\\1\")))
 
-This will map a string \"Bug#12345\" to a URL
+This maps a string \"Bug#12345\" to a URL
 \"http://bugs.debian.org/12345\"."
   :type 'alist
   :group 'riece-url)
@@ -95,7 +95,8 @@ This will map a string \"Bug#12345\" to a URL
       (save-excursion
        (goto-char start)
        (while (re-search-forward (car (car alist)) end t)
-         (let ((url (riece-url-replace-match (cdr (car alist)))))
+         (let ((url (save-match-data
+                      (riece-url-replace-match (cdr (car alist))))))
            (if (memq 'riece-highlight riece-addons)
                (widget-convert-button
                 'url-link (match-beginning 0) (match-end 0) url))