Gnus development mailing list
 help / color / mirror / Atom feed
* message.el bugout in message-buffer-name in 5.2.6
@ 1996-06-04 14:14 Greg Thompson
  0 siblings, 0 replies; only message in thread
From: Greg Thompson @ 1996-06-04 14:14 UTC (permalink / raw)


message-buffer name was invoking mail-extract-address-components with
nil.  the following patch is probably non-optimal (i make no claims at
being an elisp guy), but it works for me.

*** message.el~	Tue Jun  4 07:45:49 1996
--- message.el	Tue Jun  4 09:43:59 1996
***************
*** 2170,2181 ****
    (if message-generate-new-buffers
        (generate-new-buffer-name
         (concat "*" type
! 	       (if (or to group)
  		   (concat " to "
  			   (or (car (mail-extract-address-components to))
! 			       to)
! 			   (if group (concat " on " group) ""))
  		 "")
  	       "*"))
      (format "*%s message*" type)))
  
--- 2170,2181 ----
    (if message-generate-new-buffers
        (generate-new-buffer-name
         (concat "*" type
! 	       (if to
  		   (concat " to "
  			   (or (car (mail-extract-address-components to))
! 			       to) "")
  		 "")
+ 	       (if group (concat " on " group) "")
  	       "*"))
      (format "*%s message*" type)))
  
-- 
		-greg			  ego is beast and ego is evil
						   but ego knows best,
						  at least she says so
						      -the god machine


^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~1996-06-04 14:14 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1996-06-04 14:14 message.el bugout in message-buffer-name in 5.2.6 Greg Thompson

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).