Re: Bug in %B summary format?

[Mike Woolley <mike@ariel.co.uk>]

[-- Attachment #1: Type: text/plain, Size: 659 bytes --]

Mike Woolley <mike@ariel.co.uk> writes:

> bojohan+news@dd.chalmers.se (Johan Bockgård) writes:
>
>> The appearance I would like is the above with the actual dummy line
>> removed (and preferably a gnus-sum-thread-tree-false-root variable
>> to allow me to make the false root start ",---" or something along
>> that line).
>
> I like your suggestion better than mine :-) I'll see if I can
> implement it that way...

Patch attached.

What I've done is make a small change so that false roots are now
indicated by `gnus-sum-thread-tree-false-root'. I've defaulted this to
"> " (ie the same as `gnus-sum-thread-tree-root').

Cheers,
Mike


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: gnus-sum.el.patch --]
[-- Type: text/x-patch, Size: 1059 bytes --]

--- gnus-sum.el.orig	2003-04-12 22:47:24.000000000 +0100
+++ gnus-sum.el	2003-04-16 09:35:21.000000000 +0100
@@ -4567,6 +4567,11 @@
 If nil, use subject instead."
   :type 'string
   :group 'gnus-thread)
+(defcustom gnus-sum-thread-tree-false-root "> "
+  "With %B spec, used for a false root of a thread.
+If nil, use subject instead."
+  :type 'string
+  :group 'gnus-thread)
 (defcustom gnus-sum-thread-tree-single-indent ""
   "With %B spec, used for a thread with just one message.
 If nil, use subject instead."
@@ -4837,9 +4842,12 @@
 	     (cond
 	      ((not gnus-show-threads) "")
 	      ((zerop gnus-tmp-level)
-	       (if (cdar thread)
-		   (or gnus-sum-thread-tree-root subject)
-		 (or gnus-sum-thread-tree-single-indent subject)))
+	       (cond ((cdar thread)
+		      (or gnus-sum-thread-tree-root subject))
+		     (gnus-tmp-new-adopts
+		      (or gnus-sum-thread-tree-false-root subject))
+		     (t
+		      (or gnus-sum-thread-tree-single-indent subject))))
 	      (t
 	       (concat (apply 'concat
 			      (mapcar (lambda (item)