Lines Matching +defs:all +defs:headers
65 (defcustom gnus-fetch-old-headers nil
66 "*Non-nil means that Gnus will try to build threads by grabbing old headers.
70 will attempt to grab the headers to the old articles, and thereby
72 headers to connect otherwise loose threads will be displayed. This
74 of old headers will be fetched. If it has the value `invisible', all
75 old headers will be fetched, but none will be displayed.
87 "*The number of old headers to fetch when doing \\<gnus-summary-mode-map>\\[gnus-summary-refer-thread].
88 If t, fetch all the available old headers."
98 scattered all over the summary buffer, Gnus can gather them.
100 If non-nil, Gnus will try to gather all loose sub-threads from an
109 have all the sub-threads as children.
111 the parent and mark all the step-children as such.
157 `gnus-simplify-whitespace', and `gnus-simplify-all-whitespace'."
170 together. If `more', fill in all leaf nodes that Gnus can find. If
171 non-nil and non-`some', fill in all gaps that Gnus manages to guess."
176 (sexp :menu-tag "all" t)))
184 headers of the articles to find matches."
258 "*If non-nil, hide all threads initially.
276 "*If non-nil, which is the default, ignore subjects and do all threading based on the Reference header.
333 line of the first unseen article or, if all article have been seen, on the
376 ignores articles whose headers have not been fetched).
407 (defcustom gnus-show-all-headers nil
408 "*If non-nil, don't hide any headers."
410 :group 'gnus-article-headers
414 "*If non-nil, ignore articles with identical Message-ID headers."
419 "*If non-nil, display all articles in the same buffer.
636 If nil, all files that use the same viewing command will be given as a
694 "*Mark all articles with a score below this variable as read.
846 gnus-newsgroup-headers)))"
864 (defcustom gnus-parse-headers-hook nil
865 "*A hook called before parsing the headers."
1009 (defcustom gnus-extra-headers '(To Newsgroups)
1010 "*Extra headers to parse."
1019 "*Regexp of From headers that may be suppressed in favor of To headers."
1104 (defcustom gnus-read-all-available-headers nil
1105 "Whether Gnus should parse all headers made available to it.
1107 wish to widen the summary buffer to include all headers
1300 (defvar gnus-newsgroup-kill-headers nil)
1321 "Sorted list of articles in the current newsgroup whose headers have
1350 (defvar gnus-newsgroup-headers nil
1351 "List of article headers in the current newsgroup.")
1359 "List of `gnus-fetch-old-headers' articles in the current newsgroup.")
1365 (defvar gnus-current-headers nil)
1366 (defvar gnus-have-all-headers nil)
1394 gnus-newsgroup-headers gnus-newsgroup-threads
1396 gnus-current-article gnus-current-headers gnus-have-all-headers
1399 gnus-newsgroup-scored gnus-newsgroup-kill-headers
1437 (gnus-visible-headers .
1449 ;; eval-and-compile about all of the declarations or evaluate the
1465 is FUNCTION, FUNCTION will be apply to all newsgroups. If item is a
1513 (defun gnus-simplify-all-whitespace (str)
1514 "Remove all whitespace from STR."
1545 ;; all whitespace.
1774 "\C-c" gnus-summary-catchup-all
1833 "S" gnus-summary-show-all-threads
1835 "H" gnus-summary-hide-all-threads
1851 "C" gnus-summary-catchup-all-and-exit
1906 "v" gnus-summary-verbose-headers
1907 "a" gnus-article-strip-headers-in-body ;; mnemonic: wash archive
1920 "h" gnus-article-hide-headers
1921 "b" gnus-article-hide-boring-headers
1932 "h" gnus-article-highlight-headers
1937 "f" gnus-article-treat-fold-headers
1938 "u" gnus-article-treat-unfold-headers
1953 "v" gnus-mime-view-all-parts
1971 "A" gnus-article-strip-all-blank-lines
2031 "U" gnus-summary-unmark-all-processable
2040 "a" gnus-uu-mark-all
2098 ;; Few elements--put them all in one pane.
2139 ["Headers" gnus-article-hide-headers t]
2144 ["Boring headers" gnus-article-hide-boring-headers t])
2147 ["Headers" gnus-article-highlight-headers t]
2156 ["View all" gnus-mime-view-all-parts t]
2162 ["Extract all parts..." gnus-summary-save-parts t]
2188 ["Show picons in mail headers" gnus-treat-mail-picon t]
2189 ["Show picons in news headers" gnus-treat-newsgroups-picon t]
2216 ["All" gnus-article-strip-all-blank-lines t]
2219 ["Leading space in headers"
2238 ["Verbose header" gnus-summary-verbose-headers t]
2240 ["Unfold headers" gnus-article-treat-unfold-headers t]
2343 ["Find all messages in thread" gnus-summary-refer-thread t]
2345 ["Hide threads" gnus-summary-hide-all-threads t]
2346 ["Show threads" gnus-summary-show-all-threads t]
2426 ["Catchup all" gnus-summary-catchup-all t]
2461 ["Remove all marks" gnus-summary-unmark-all-processable t]
2468 ["Mark all" gnus-uu-mark-all t]
2550 ["Catchup all and exit" gnus-summary-catchup-all-and-exit t]
2567 ;; affect _new_ message buffers. We might add a function that walks thru all
2607 (gnus-summary-followup-with-original "mail/reply-all")
2608 (gnus-summary-followup "mail/reply-all" nil :visible nil)
2732 (let ((headers '(("author" "from" string)
2759 (while headers
2760 (setq header (car headers))
2804 (setq headers (cdr headers)))
2831 (kill-all-local-variables)
2866 "Make all the local summary buffer variables."
2999 "Add OFFSET to the POS of all data entries in DATA."
3025 "Return a list of all children to NUMBER."
3090 `(let ((headers
3095 (and headers
3096 (vectorp headers)
3097 (mail-header-subject headers))))
3136 This is all marks except unread, ticked, dormant, and expirable."
3174 "Compute the positions of all articles."
3179 (gnus-summary-show-all-threads)
3217 up nicely formatted displays - we make all possible glyphs
3224 ;; Nix out all the control chars...
3296 (headers gnus-current-headers)
3319 gnus-current-headers headers
3386 ;; Here, all marks are bound to Z.
3446 (let ((extra-headers (mail-header-extra header))
3450 ((setq to (cdr (assq 'To extra-headers)))
3455 ((setq newsgroups (cdr (assq 'Newsgroups extra-headers)))
3606 "Go through the local params of GROUP and set all variable specs in that list."
3622 (defun gnus-summary-read-group (group &optional show-all no-article
3634 group show-all no-article
3637 (setq show-all nil
3651 (defun gnus-summary-read-group-1 (group show-all no-article
3663 group show-all select-articles))))
3728 (gnus-possibly-score-headers))
3733 (if show-all
3735 (gnus-summary-initial-limit show-all))
3736 (gnus-summary-initial-limit show-all))
3751 ((and gnus-newsgroup-scored show-all)
3831 (when gnus-newsgroup-headers
3839 (gnus-sort-articles gnus-newsgroup-headers))))
3876 "Gather threads by looking at Subject headers."
3905 ;; If you want a dummy root above all
3917 "Gather threads by looking at References headers."
3987 ;; Push all the subthreads onto the stack.
3992 "Go through the dependency hashtb and find the roots. Return all threads."
4102 (let ((headers gnus-newsgroup-headers)
4113 (while (setq header (pop headers))
4152 ;; Look at all the articles that refer back to old articles, and
4153 ;; fetch the headers for the articles that aren't there. This will
4256 (push header gnus-newsgroup-headers)
4266 (defun gnus-build-all-threads ()
4267 "Read all the headers."
4283 (push header gnus-newsgroup-headers)
4395 ;; We now have all (unique) roots.
4424 (let ((headers gnus-newsgroup-headers))
4425 (while (and headers
4426 (not (= number (mail-header-number (car headers)))))
4427 (pop headers))
4428 (when headers
4429 (car headers))))
4431 (defun gnus-parent-headers (in-headers &optional generation)
4432 "Return the headers of the GENERATIONeth parent of HEADERS."
4436 (headers in-headers)
4440 (setq references (mail-header-references headers)))
4441 (setq headers (if (and references
4446 (and (not (eq headers in-headers))
4447 headers)))
4461 "Return the article headers of ID."
4494 (let (headers thread last-id)
4497 headers (message-flatten-list (gnus-id-to-thread last-id)))
4512 (when (member (caar sub) headers)
4518 (when (eq (car sub) (car headers))
4612 (setq gnus-newsgroup-headers
4721 "Sort threads by the sum of all scores in the thread.
4839 or a straight list of headers."
4863 ;; If this is a straight (sic) list of headers, then a
4939 ;; sub-threads at all.
5145 (defun gnus-summary-prepare-unthreaded (headers)
5151 (while headers
5154 (setq header (pop headers))))
5188 (dolist (header gnus-newsgroup-headers)
5207 (defun gnus-fetch-headers (articles)
5208 "Fetch headers of ARTICLES."
5210 (gnus-message 5 "Fetching headers for %s..." name)
5213 (setq gnus-headers-retrieved-by
5214 (gnus-retrieve-headers
5216 ;; We might want to fetch old headers, but
5219 (not (eq gnus-fetch-old-headers 'some))
5220 (not (numberp gnus-fetch-old-headers)))
5222 gnus-fetch-old-headers))))
5223 (gnus-get-newsgroup-headers-xover
5225 (gnus-get-newsgroup-headers))
5226 (gnus-message 5 "Fetching headers for %s...done" name))))
5228 (defun gnus-select-newsgroup (group &optional read-all select-articles)
5230 If READ-ALL is non-nil, all articles in the group are selected.
5275 ((not (zerop (or (car-safe read-all) 0)))
5277 ;; all articles.
5279 ((eq display 'all)
5285 ;; it makes Gnus fetch all headers and then limit the
5326 (setq articles (gnus-articles-to-read group read-all)))
5338 ;; Retrieve the headers and read them in.
5340 (setq gnus-newsgroup-headers (gnus-fetch-headers articles))
5354 (mapcar (lambda (headers) (mail-header-number headers))
5355 gnus-newsgroup-headers))
5366 (when (and gnus-fetch-old-headers
5367 (eq gnus-headers-retrieved-by 'nov))
5368 (if (eq gnus-fetch-old-headers 'invisible)
5369 (gnus-build-all-threads)
5384 (when gnus-newsgroup-headers
5386 (mail-header-number (car gnus-newsgroup-headers))
5389 (gnus-last-element gnus-newsgroup-headers))))
5391 (or gnus-newsgroup-headers t)))))
5462 (defun gnus-articles-to-read (group &optional read-all)
5465 ;; Select all articles if `read-all' is non-nil, or if there
5467 (if (or read-all
5470 ;; Fetch all if the predicate is non-nil.
5472 ;; We want to select the headers for all the articles in
5473 ;; the group, so we select either all the active
5490 ((numberp read-all)
5491 read-all)
5584 "Set all article lists and remove all marks that are no longer valid."
5658 ;; Go through all types.
5663 ;; This list has articles. So we delete all missing
5675 ;; Add all marks lists to the list of marks lists.
5689 (all prev))
5696 (setq list (cdr all)))))
5750 ;; We bind all these variables that are used in the `eval' form
5772 (if (and gnus-current-headers
5773 (vectorp gnus-current-headers))
5775 (mail-header-subject gnus-current-headers))
5805 (defun gnus-create-xref-hashtb (from-newsgroup headers unreads)
5806 "Go through the HEADERS list and add all Xrefs to a hash table.
5812 (while headers
5813 (setq header (pop headers))
5832 (defun gnus-mark-xrefs-as-read (from-newsgroup headers unreads)
5833 "Look through all the headers and mark the Xrefs as read."
5839 (gnus-create-xref-hashtb from-newsgroup headers unreads))
5874 ;; First peel off all invalid article numbers.
5948 (defun gnus-get-newsgroup-headers (&optional dependencies force-new)
5954 headers id end ref
5963 ;; Translate all TAB characters into SPACE characters.
5967 (gnus-run-hooks 'gnus-parse-headers-hook)
6078 (when gnus-extra-headers
6079 (let ((extra gnus-extra-headers)
6100 (push header headers))
6103 (nreverse headers)))))
6106 (defun gnus-get-newsgroup-headers-xover (sequence &optional
6110 Return a list of headers that match SEQUENCE (see
6111 `nntp-retrieve-headers')."
6120 ((eq gnus-read-all-available-headers t)
6122 ((and (stringp gnus-read-all-available-headers)
6124 (string-match gnus-read-all-available-headers group))
6127 number headers header)
6131 ;; Allow the user to mangle the headers before parsing them.
6132 (gnus-run-hooks 'gnus-parse-headers-hook)
6150 (push header headers))
6157 ;; headers using HEAD.
6160 ;; We (probably) got all the headers.
6161 (nreverse headers)
6164 (nreverse headers)
6165 (when (eq (gnus-retrieve-headers sequence group) 'headers)
6166 (gnus-get-newsgroup-headers))))))))
6169 "Fill in the Xref value in `gnus-current-headers', if necessary.
6171 (let ((headers (save-excursion (set-buffer gnus-summary-buffer)
6172 gnus-current-headers)))
6174 (not headers)
6175 (and (mail-header-xref headers)
6176 (not (string= (mail-header-xref headers) "")))
6180 (nnheader-narrow-to-headers)
6188 (mail-header-set-xref headers xref)))))))
6221 (let ((gnus-newsgroup-headers (list header)))
6319 (gnus-summary-unmark-all-processable))
6330 (gnus-summary-unmark-all-processable)
6540 ;; If none are read, then all are unread.
6593 ;; If none are read, then all are unread.
6636 "Perform any operation on all articles that are process/prefixed."
6683 (defun gnus-summary-reselect-current-group (&optional all rescan)
6685 The prefix argument ALL means to select all articles."
6699 (gnus-group-read-group all t)
6702 (defun gnus-summary-rescan-group (&optional all)
6705 (gnus-summary-reselect-current-group all t))
6711 (when gnus-newsgroup-kill-headers
6721 (let ((headers gnus-newsgroup-headers))
6739 (gnus-mark-xrefs-as-read group headers gnus-newsgroup-unreads))
6798 ;; Make all changes in this group permanent.
6826 ;; We set all buffer-local variables to nil. It is unclear why
7075 ;; First we semi-exit this group to update Xrefs and all variables.
7256 (defun gnus-summary-display-article (article &optional all-header)
7271 (funcall gnus-summary-display-article-function article all-header)
7272 (gnus-article-prepare article all-header))
7285 (defun gnus-summary-select-article (&optional all-headers force pseudo article)
7287 If ALL-HEADERS is non-nil, show all header fields. If FORCE is
7295 (all-headers (not (not all-headers))) ;Must be t or nil.
7315 (gnus-summary-display-article article all-headers)
7640 if all article have been seen, on the subject line of the first unread
7715 (defun gnus-summary-goto-article (article &optional all-headers force)
7735 (gnus-summary-display-article article all-headers)
7773 If given a prefix, remove all limits."
7778 gnus-newsgroup-headers))))
7798 (or header "subject") subject 'all nil nil
7865 (symbol-name (car gnus-extra-headers))
7871 gnus-extra-headers)
7882 (cons 'extra header) regexp 'all nil nil
7905 (defun gnus-summary-limit-to-unread (&optional all)
7909 (if all
7912 ;; Concat all the marks that say that an article is read and have
7975 "Display all the hidden articles that is in the thread with ID in it.
7990 "Display all the hidden articles that have HEADERs that match REGEXP."
7999 "Insert all the dormant articles for this group into the current buffer."
8007 "Display all the hidden articles that are marked as dormant.
8018 "Hide all dormant articles."
8025 "Hide all dormant articles that have no children."
8029 ;; Find all articles that are either not dormant or have
8048 (defun gnus-summary-limit-mark-excluded-as-read (&optional all)
8049 "Mark all unread excluded articles as read.
8056 gnus-newsgroup-headers)
8063 (if all
8088 ;; This will do all the work of generating the new summary buffer
8123 (when (or (eq gnus-fetch-old-headers 'some)
8124 (eq gnus-fetch-old-headers 'invisible)
8125 (numberp gnus-fetch-old-headers)
8128 ;; Deal with old-fetched headers and sparse threads.
8136 (eq gnus-fetch-old-headers 'invisible))
8152 "Cut off all uninteresting articles from the beginning of THREADS."
8153 (when (or (eq gnus-fetch-old-headers 'some)
8154 (eq gnus-fetch-old-headers 'invisible)
8155 (numberp gnus-fetch-old-headers)
8168 fetch-old-headers verbiage, and so on."
8173 (not (eq gnus-fetch-old-headers 'some))
8174 (not (numberp gnus-fetch-old-headers))
8175 (not (eq gnus-fetch-old-headers 'invisible))
8229 (and (or (eq gnus-fetch-old-headers 'some)
8230 (numberp gnus-fetch-old-headers))
8235 (and (eq gnus-fetch-old-headers 'invisible)
8281 "Mark all articles in THREAD as read."
8291 ;; Go recursively through all subthreads.
8320 (nnheader-narrow-to-headers)
8341 "Fetch all articles mentioned in the References header.
8362 "Fetch all articles in the current thread.
8363 If LIMIT (the numerical prefix), fetch that many old headers instead
8369 (unless (eq gnus-fetch-old-headers 'invisible)
8370 (gnus-message 5 "Fetching headers for %s..." gnus-newsgroup-name)
8371 ;; Retrieve the headers and read them in.
8373 (gnus-retrieve-headers
8381 ;; headers.
8382 (gnus-retrieve-headers (list gnus-newsgroup-end)
8385 (gnus-build-all-threads)
8387 (gnus-message 5 "Fetching headers for %s...done" gnus-newsgroup-name))
8527 ;; Make all postings to this group go to the parent group.
8555 ;; Remove some headers that may lead nndoc to make
8567 ;; Make all postings to this group go to the parent group.
8573 ;; Now we have selected all the documents.
8704 "Return a list of all articles that match REGEXP on HEADER.
8705 This search includes all articles in the current group that Gnus has
8706 fetched headers for, whether they are displayed or not."
8710 (dolist (header gnus-newsgroup-headers)
8717 "Return a list of all articles that match REGEXP on HEADER.
8719 BACKWARD is non-nil. If BACKWARD is `all', do all articles.
8722 in the comparisons. If NOT-MATCHING, return a list of all articles that
8736 (dolist (d (if (eq backward 'all)
8741 (when (and (or (not unread) ; We want all articles...
8765 gnus-extra-headers))
8773 (gnus-summary-show-all-threads)
8781 gnus-treat-hide-boring-headers
8817 "Truncate to LEN and quote all \"(\"'s in STRING."
8866 (mail-header-subject gnus-current-headers)
8870 (mail-header-from gnus-current-headers)
8876 (mail-header-date gnus-current-headers) ")"))))
8903 (gnus-newsgroup-ignored-charsets 'gnus-all))
8924 (setq header (car (gnus-get-newsgroup-headers deps t))))))
8941 (let ((gnus-have-all-headers t)
8963 (defun gnus-summary-verbose-headers (&optional arg)
8968 (setq gnus-show-all-headers
8971 (not gnus-show-all-headers))
8977 "Show the headers if they are hidden, or hide them if they are shown.
8991 (gnus-article-hidden-text-p 'headers))))
9002 (let ((gnus-treat-hide-headers nil)
9003 (gnus-treat-hide-boring-headers nil))
9004 (gnus-delete-wash-type 'headers)
9018 (defun gnus-summary-show-all-headers ()
9019 "Make all header lines visible."
9325 ;; Re-activate all groups that have been moved to.
9436 ;; This doesn't look like an article, so we fudge some headers.
9465 ;; This doesn't look like an article, so we fudge some headers.
9491 "Expire all articles that are marked as expirable in the current group."
9532 ;; We go through the old list of expirable, and mark all
9550 "Expunge all expirable articles in the current group.
9551 This means that *all* articles that are marked as expirable will be
9556 "Are you really, really sure you want to delete all expirable messages? ")
9596 ;; after all.
9684 ,(or (mail-header-references gnus-current-headers) "")
9742 (setq header (car (gnus-get-newsgroup-headers
9806 Display a buffer showing all fancy splitting patterns which matched."
9911 (defun gnus-summary-unmark-all-processable ()
9912 "Remove the process mark from all articles."
10388 (defun gnus-summary-mark-region-as-read (point mark all)
10389 "Mark all unread articles between point and mark as read.
10390 If given a prefix, mark all articles between point and mark as read,
10400 (when (or all
10428 "Clear all marks from articles with score above SCORE."
10433 "Tick all articles with score above SCORE."
10453 (defalias 'gnus-summary-show-all-expunged 'gnus-summary-limit-include-expunged)
10455 "Display all the hidden articles that were expunged for low scores."
10459 headers h)
10464 (push h headers)))
10466 (if (not headers)
10474 headers)
10475 (gnus-summary-prepare-unthreaded (nreverse headers))
10480 (defun gnus-summary-catchup (&optional all quietly to-here not-mark reverse)
10481 "Mark all unread articles in this newsgroup as read.
10501 (if all
10502 "Mark absolutely all articles as read? "
10503 "Mark all unread articles as read? ")))
10511 (when all
10520 ;; We actually mark all articles as canceled, which we
10522 (gnus-summary-show-all-threads)
10528 (while (gnus-summary-find-next (not all))
10530 (when (gnus-summary-first-subject (not all))
10534 (gnus-summary-find-next (not all))))))
10539 (defun gnus-summary-catchup-to-here (&optional all)
10540 "Mark all unticked articles before the current one as read.
10547 (when (or all (gnus-summary-find-prev))
10548 (gnus-summary-catchup all t beg)))))
10551 (defun gnus-summary-catchup-from-here (&optional all)
10552 "Mark all unticked articles after (and including) the current one as read.
10559 (when (or all (gnus-summary-find-next))
10560 (gnus-summary-catchup all t beg nil t)))))
10563 (defun gnus-summary-catchup-all (&optional quietly)
10564 "Mark all articles in this newsgroup as read.
10570 (defun gnus-summary-catchup-and-exit (&optional all quietly)
10571 "Mark all unread articles in this group as read, then exit.
10572 If prefix argument ALL is non-nil, all articles are marked as read.
10575 (when (gnus-summary-catchup all quietly nil 'fast)
10582 (defun gnus-summary-catchup-all-and-exit (&optional quietly)
10583 "Mark all articles in this newsgroup as read, and then exit.
10589 (defun gnus-summary-catchup-and-goto-next-group (&optional all)
10590 "Mark all articles in this group as read and select the next group.
10591 If given a prefix, mark all articles, unread as well as ticked, as
10595 (gnus-summary-catchup all))
10632 "Return a list of all articles in the current thread.
10633 If ARTICLE is non-nil, return all articles in the thread that starts
10718 (gnus-summary-unmark-all-processable)
10739 (defun gnus-summary-show-all-threads ()
10740 "Show all threads."
10767 (gnus-summary-hide-all-threads
10788 (defun gnus-summary-hide-all-threads (&optional predicate)
10789 "Hide all thread subtrees.
10928 ;; Mark all the articles.
11096 (defun gnus-summary-pipe-output (&optional arg headers)
11102 If HEADERS (the symbolic prefix), include the headers, too."
11106 (gnus-save-all-headers (or headers gnus-save-all-headers)))
11210 (nnheader-narrow-to-headers)
11358 ;; If all commands are to be bunched up on one line, we collect
11453 (setq gnus-current-headers (gnus-summary-article-header))
11460 "Read the headers of article ID and enter them into the Gnus system."
11496 (not (setq header (car (gnus-get-newsgroup-headers nil t)))))
11510 (push header gnus-newsgroup-headers)
11511 (setq gnus-current-headers header)
11516 "Remove header NUMBER from `gnus-newsgroup-headers'."
11517 (if (and gnus-newsgroup-headers
11518 (= number (mail-header-number (car gnus-newsgroup-headers))))
11519 (pop gnus-newsgroup-headers)
11520 (let ((headers gnus-newsgroup-headers))
11521 (while (and (cdr headers)
11522 (not (= number (mail-header-number (cadr headers)))))
11523 (pop headers))
11524 (when (cdr headers)
11525 (setcdr headers (cddr headers))))))
11676 "Offer to save all active summary buffers."
11678 ;; Go through all buffers and find all summaries.
11692 ;; Go through all these summary buffers and offer to save them.
11724 (defun gnus-summary-display-buttonized (&optional show-all-parts)
11726 If SHOW-ALL-PARTS (the prefix) is non-nil, all multipart/* parts are
11731 (gnus-mime-display-multipart-as-mixed show-all-parts))
11779 (defun gnus-summary-make-all-marking-commands ()
11845 gnus-newsgroup-headers)))
11846 (setq gnus-newsgroup-headers
11848 gnus-newsgroup-headers
11849 (gnus-fetch-headers articles)
11856 (when (and gnus-fetch-old-headers
11857 (eq gnus-headers-retrieved-by 'nov))
11858 (if (eq gnus-fetch-old-headers 'invisible)
11859 (gnus-build-all-threads)
11868 (when gnus-newsgroup-headers
11870 (mail-header-number (car gnus-newsgroup-headers))
11873 (gnus-last-element gnus-newsgroup-headers))))
11875 (gnus-possibly-score-headers))))
11877 (defun gnus-summary-insert-old-articles (&optional all)
11878 "Insert all old articles in this group.
11893 ((numberp all)
11894 (if (< all len)
11898 (while (> all 0)
11903 (> all 0))
11905 (setq all (1- all)
11908 (all
11928 (setq all (string-to-number input))
11929 (if (< all len)
11933 (while (> all 0)
11938 (> all 0))
11940 (setq all (1- all)
11950 "Insert all new articles in this group."
11971 (gnus-summary-make-all-marking-commands)