Synch with Oort Gnus.

[elisp/gnus.git-] / lisp / gnus-agent.el

diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index 28899de..da70485 100644 (file)
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -1090,11 +1090,14 @@ This can be added to `gnus-select-article-hook' or
 In particular, checks that the file is sorted by article number
 and that there are no duplicates."
   (let (prev-num)
+    (require 'thingatpt)
     (save-excursion
       (when buffer (set-buffer buffer))
       (save-excursion
         (save-restriction
-          (let ((deactivate-mark deactivate-mark))
+          (let ((deactivate-mark (if (boundp 'deactivate-mark)
+                                    (symbol-value 'deactivate-mark)
+                                  nil)))
             (widen)
             (goto-char (point-min))
             (setq prev-num (number-at-point))