X-Git-Url: http://cgit.sxemacs.org/?a=blobdiff_plain;f=lisp%2Fnnmh.el;h=984144e0d9a7ec6a8ce120449d28f81b02611d0b;hb=edf6326b4007e10bea993feaecf2464f38732e99;hp=131861e03ecc33fd7d40eea2dd593a5e04073937;hpb=e95972075ac7a7c7aeb23b5c2edd0dfe60ac67c7;p=gnus

diff --git a/lisp/nnmh.el b/lisp/nnmh.el
index 131861e03..984144e0d 100644
--- a/lisp/nnmh.el
+++ b/lisp/nnmh.el
@@ -149,7 +149,7 @@ as unread by Gnus.")
 	 (save-excursion (nnmail-find-file file))
 	 (string-to-number (file-name-nondirectory file)))))
 
-(deffoo nnmh-request-group (group &optional server dont-check)
+(deffoo nnmh-request-group (group &optional server dont-check info)
   (nnheader-init-server-buffer)
   (nnmh-possibly-change-directory group server)
   (let ((pathname (nnmail-group-pathname group nnmh-directory))
@@ -258,9 +258,6 @@ as unread by Gnus.")
 					       &optional server force)
   (nnmh-possibly-change-directory newsgroup server)
   (let ((is-old t)
-	(nnmail-expiry-target
-	 (or (gnus-group-find-parameter newsgroup 'expiry-target t)
-	     nnmail-expiry-target))
 	article rest mod-time)
     (nnheader-init-server-buffer)