(spam-spamoracle-learn): insert-string is obsolete.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 52ee2d7..133ab13 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-06-20  Jesper Harder  <harder@ifa.au.dk>
+
+       * spam.el (spam-spamoracle-learn): insert-string is obsolete.
+
 2003-06-19  Teodor Zlatanov  <tzz@lifelogs.com>
 
        * spam.el (spam-enter-list): do not enter duplicate addresses into

diff --git a/lisp/spam.el b/lisp/spam.el
index 205f2be..bdf73e1 100644 (file)
--- a/lisp/spam.el
+++ b/lisp/spam.el
@@ -1144,7 +1144,7 @@ Uses `gnus-newsgroup-name' if category is nil (for ham registration)."
     (let ((temp-buffer-name (buffer-name)))
       (save-excursion
        (goto-char (point-min))
-       (insert-string (spam-get-article-as-string article))
+       (insert (spam-get-article-as-string article))
        (let* ((arg (if article-is-spam-p "-spam" "-good"))
               (status 
                (apply 'call-process-region