[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
gnus-summary-limit-children limits maximum thread length
From: |
Chris Moore |
Subject: |
gnus-summary-limit-children limits maximum thread length |
Date: |
Tue, 05 Dec 2006 13:01:24 +0100 |
The definition of gnus-summary-limit-children locally binds
max-lisp-eval-depth to 5000, even if it was previously higher than
that.
This makes it impossible to view long threads of messages.
Better would be if it used 'max' to make sure it was only increasing
the value, not decreasing it.
The same goes for gnus-sort-threads(), if we're going to keep the
recursive version:
------------------------------------------------------------------------
--- lisp/gnus/gnus-sum.el 2006-11-27 00:02:10.000000000 +0100
+++ /tmp/gnus-sum.el 2006-12-05 12:54:33.000000000 +0100
@@ -4561,7 +4561,7 @@
(if (not gnus-thread-sort-functions)
threads
(gnus-message 8 "Sorting threads...")
- (let ((max-lisp-eval-depth 5000))
+ (let ((max-lisp-eval-depth (max 5000 max-lisp-eval-depth)))
(prog1 (gnus-sort-threads-1
threads
(gnus-make-sort-function gnus-thread-sort-functions))
@@ -8165,7 +8165,7 @@
;; will really go down to a leaf article first, before slowly
;; working its way up towards the root.
(when thread
- (let* ((max-lisp-eval-depth 5000)
+ (let* ((max-lisp-eval-depth (max 5000 max-lisp-eval-depth))
(children
(if (cdr thread)
(apply '+ (mapcar 'gnus-summary-limit-children
------------------------------------------------------------------------
In GNU Emacs 22.0.91.19 (i686-pc-linux-gnu, GTK+ Version 2.8.20)
of 2006-12-03 on chrislap
X server distributor `The X.Org Foundation', version 11.0.70101000
configured using `configure '--with-gtk' '--with-xpm' '--with-jpeg'
'--with-png' '--with-gif''
Important settings:
value of $LC_ALL: en_GB.UTF-8
value of $LC_COLLATE: nil
value of $LC_CTYPE: nil
value of $LC_MESSAGES: nil
value of $LC_MONETARY: nil
value of $LC_NUMERIC: nil
value of $LC_TIME: nil
value of $LANG: en_GB.UTF-8
locale-coding-system: utf-8
default-enable-multibyte-characters: t
Major mode: Emacs-Lisp
Minor modes in effect:
show-paren-mode: t
display-time-mode: t
iswitchb-mode: t
dynamic-completion-mode: t
shell-dirtrack-mode: t
tooltip-mode: t
mouse-wheel-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
font-lock-mode: t
unify-8859-on-encoding-mode: t
utf-translate-cjk-mode: t
auto-compression-mode: t
column-number-mode: t
line-number-mode: t
transient-mark-mode: t
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- gnus-summary-limit-children limits maximum thread length,
Chris Moore <=