Go back to grave quoting in source-code docstrings etc.

[gnus] / lisp / gnus-draft.el

diff --git a/lisp/gnus-draft.el b/lisp/gnus-draft.el
index 1709b1c..aebf118 100644 (file)
--- a/lisp/gnus-draft.el
+++ b/lisp/gnus-draft.el
@@ -1,6 +1,6 @@
 ;;; gnus-draft.el --- draft message support for Gnus
 
-;; Copyright (C) 1997-2011 Free Software Foundation, Inc.
+;; Copyright (C) 1997-2015 Free Software Foundation, Inc.
 
 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
 ;; Keywords: news
@@ -327,8 +327,7 @@ If DONT-POP is nil, display the buffer after setting it up."
 (defun gnus-draft-clear-marks ()
   (setq gnus-newsgroup-reads nil
        gnus-newsgroup-marked nil
-       gnus-newsgroup-unreads
-       (gnus-uncompress-range (gnus-active gnus-newsgroup-name))))
+       gnus-newsgroup-unreads (nndraft-articles)))
 
 (provide 'gnus-draft)