lisp/gnus/gnus-cite.el (gnus-cite-add-face): Make non-sticky overlays

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 65f5b2539cf9389ded27ba7bd6937210f1c44c15..d2563c821d699096cc5e271da466e372476ec460 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,7 @@
+2013-11-05  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-cite.el (gnus-cite-add-face): Make non-sticky overlays.
+
 2013-10-30  Glenn Morris  <rgm@gnu.org>
 
        * gnus-group.el (gnus-group-browse-foreign-server):

diff --git a/lisp/gnus/gnus-cite.el b/lisp/gnus/gnus-cite.el
index 22e97cd8f4fab623ea6542ad5edac5f3fb72f5a3..0ea7e2e3f7de1dfe031d723273c72352a9a873a2 100644 (file)
--- a/lisp/gnus/gnus-cite.el
+++ b/lisp/gnus/gnus-cite.el
@@ -1096,7 +1096,7 @@ See also the documentation for `gnus-article-highlight-citation'."
        (skip-chars-backward " \t")
        (setq to (point))
        (when (< from to)
-         (push (setq overlay (gnus-make-overlay from to))
+         (push (setq overlay (gnus-make-overlay from to nil t))
                gnus-cite-overlay-list)
          (gnus-overlay-put overlay 'evaporate t)
          (gnus-overlay-put overlay 'face face))))))