X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fnneething.el;h=97f5d2f3c58c1bbfa878eac35d8545db596e67f4;hb=4dd18c1acb188e71a04e5bcf9df7df7a453ff2eb;hp=828d122726bec0a85092db131ba6bf2ccdae24fb;hpb=2cd4287e4cad6a480ed93acffc6e91e268ef596f;p=elisp%2Fgnus.git- diff --git a/lisp/nneething.el b/lisp/nneething.el index 828d122..97f5d2f 100644 --- a/lisp/nneething.el +++ b/lisp/nneething.el @@ -1,7 +1,7 @@ ;;; nneething.el --- arbitrary file access for Gnus ;; Copyright (C) 1995,96,97,98 Free Software Foundation, Inc. -;; Author: Lars Magne Ingebrigtsen +;; Author: Lars Magne Ingebrigtsen ;; Masanobu UMEDA ;; Keywords: news, mail @@ -103,11 +103,11 @@ If this variable is nil, no files will be excluded.") (and large (zerop (% count 20)) - (message "nneething: Receiving headers... %d%%" + (nnheader-message 5 "nneething: Receiving headers... %d%%" (/ (* count 100) number)))) (when large - (message "nneething: Receiving headers...done")) + (nnheader-message 5 "nneething: Receiving headers...done")) (nnheader-fold-continuation-lines) 'headers))))