gnus-art.el, gnus-async.el: Use point-min-marker and point-max-marker
authorDmitry Antipov <dmantipov@yandex.ru>
Fri, 11 Jan 2013 15:08:09 +0000 (15:08 +0000)
committerKatsumi Yamaoka <yamaoka@jpl.org>
Fri, 11 Jan 2013 15:08:09 +0000 (15:08 +0000)
lisp/ChangeLog
lisp/gnus-art.el
lisp/gnus-async.el

index c6519ea..e09bab9 100644 (file)
@@ -1,3 +1,9 @@
+2013-01-11  Dmitry Antipov  <dmantipov@yandex.ru>
+
+       * gnus-art.el (gnus-mime-display-security): Use point-min-marker
+       and point-max-marker.
+       * gnus-async.el (gnus-async-article-callback): Use point-max-marker.
+
 2013-01-11  Julien Danjou  <julien@danjou.info>
 
        * color.el (color-rgb-to-hsv): Fix conversion computing in case min and
index a476851..7e642aa 100644 (file)
@@ -8689,9 +8689,7 @@ For example:
             gnus-mime-security-button-end-line-format))
        (gnus-insert-mime-security-button handle)))
     (mm-set-handle-multipart-parameter
-     handle 'gnus-region
-     (cons (set-marker (make-marker) (point-min))
-          (set-marker (make-marker) (point-max))))
+     handle 'gnus-region (cons (point-min-marker) (point-max-marker)))
     (goto-char (point-max))))
 
 (defun gnus-mime-security-run-function (function)
index 41b0cc2..c5d6433 100644 (file)
@@ -254,7 +254,7 @@ that was fetched."
         gnus-async-article-alist
         (cons (list (intern (format "%s-%d" group article)
                             gnus-async-hashtb)
-                    mark (set-marker (make-marker) (point-max))
+                    mark (point-max-marker)
                     group article)
               gnus-async-article-alist))))
     (if (not (gnus-buffer-live-p summary))