;;; Code:
(eval-when-compile (require 'cl))
-
(require 'gnus)
(require 'gnus-art)
(require 'gnus-range)
(if (and gnus-current-kill-article
(get-buffer gnus-summary-buffer))
;; Assume newsgroup is selected.
- (gnus-kill-file-apply-string (buffer-substring (point-min) (point-max)))
+ (gnus-kill-file-apply-string (buffer-string))
(ding) (gnus-message 2 "No newsgroup is selected.")))
(defun gnus-kill-file-apply-string (string)