Bug in current v14 - no followup or reply possible

Bug in current v14 - no followup or reply possible

[Harry Putnam]

I guess no one else besides Steiner and me are noticing this problem,
but for me it is thoroughly reproducable so much so that I have to
fall back to my older v11 to be able to post at all.

Any attemp to follow up or reply in v14 gets the error below in the
backtrace:

Debugger entered--Lisp error: (void-variable winconf-name)
  (cons winconf-name (quote (gnus-current-window-configuration)))
  (cons (cons winconf-name (quote (gnus-current-window-configuration))) (cons (cons buffer (quote ((buffer-name (current-buffer))))) (cons (cons article (quote (gnus-article-reply))) (cons (cons yanked (quote (gnus-article-yanked-articles))) (cons (cons group (quote (gnus-newsgroup-name))) (quote ((message-header-setup-hook ...) (mbl mml-buffer-list) (message-mode-hook ...))))))))
  (cons (cons winconf (quote ((current-window-configuration)))) (cons (cons winconf-name (quote (gnus-current-window-configuration))) (cons (cons buffer (quote ((buffer-name (current-buffer))))) (cons (cons article (quote (gnus-article-reply))) (cons (cons yanked (quote (gnus-article-yanked-articles))) (cons (cons group (quote ...)) (quote (... ... ...))))))))
  (backquote-list* (cons winconf (quote ((current-window-configuration)))) (cons winconf-name (quote (gnus-current-window-configuration))) (cons buffer (quote ((buffer-name (current-buffer))))) (cons article (quote (gnus-article-reply))) (cons yanked (quote (gnus-article-yanked-articles))) (cons group (quote (gnus-newsgroup-name))) (quote ((message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook)))))
  (cons (backquote-list* (cons winconf (quote ((current-window-configuration)))) (cons winconf-name (quote (gnus-current-window-configuration))) (cons buffer (quote ((buffer-name (current-buffer))))) (cons article (quote (gnus-article-reply))) (cons yanked (quote (gnus-article-yanked-articles))) (cons group (quote (gnus-newsgroup-name))) (quote ((message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))))) (cons (quote (setq mml-buffer-list nil)) (cons (quote (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc))) (cons (quote (add-hook (quote message-mode-hook) (lambda nil (setq message-newsreader ...)))) (cons (list (quote add-hook) (quote (quote message-mode-hook)) (list (quote if) (backquote-list* ... config ...) (list ... nil ...) (list ... nil ...))) (cons (backquote-list* (quote gnus-alist-pull) (list ... ...) (quote ...)) (cons (list ... ... ...) (cons ... ...))))))))
  (cons (quote let) (cons (backquote-list* (cons winconf (quote ((current-window-configuration)))) (cons winconf-name (quote (gnus-current-window-configuration))) (cons buffer (quote ((buffer-name (current-buffer))))) (cons article (quote (gnus-article-reply))) (cons yanked (quote (gnus-article-yanked-articles))) (cons group (quote (gnus-newsgroup-name))) (quote ((message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))))) (cons (quote (setq mml-buffer-list nil)) (cons (quote (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc))) (cons (quote (add-hook (quote message-mode-hook) (lambda nil ...))) (cons (list (quote add-hook) (quote ...) (list ... ... ... ...)) (cons (backquote-list* ... ... ...) (cons ... ...))))))))
  (backquote-list* (quote let) (backquote-list* (cons winconf (quote ((current-window-configuration)))) (cons winconf-name (quote (gnus-current-window-configuration))) (cons buffer (quote ((buffer-name (current-buffer))))) (cons article (quote (gnus-article-reply))) (cons yanked (quote (gnus-article-yanked-articles))) (cons group (quote (gnus-newsgroup-name))) (quote ((message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))))) (quote (setq mml-buffer-list nil)) (quote (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc))) (quote (add-hook (quote message-mode-hook) (lambda nil (setq message-newsreader (setq message-mailer (gnus-extended-version)))))) (list (quote add-hook) (quote (quote message-mode-hook)) (list (quote if) (backquote-list* (quote memq) config (quote ((quote (reply-yank reply))))) (list (quote lambda) nil (list (quote gnus-configure-posting-styles) group)) (list (quote lambda) nil (list (quote let) (quote (gnus-article-copy)) (list (quote gnus-configure-posting-styles) group))))) (backquote-list* (quote gnus-alist-pull) (list (quote quote) (intern gnus-draft-meta-information-header)) (quote (message-required-headers))) (list (quote when) (list (quote and) group (list (quote not) (backquote-list* (quote string=) group (quote (""))))) (backquote-list* (quote push) (list (quote cons) (quote (intern gnus-draft-meta-information-header)) (list (quote gnus-inews-make-draft) (list (quote or) yanked article))) (quote (message-required-headers)))) (backquote-list* (quote unwind-protect) (cons (quote progn) forms) (list (quote gnus-inews-add-send-actions) winconf buffer article config yanked winconf-name) (quote (setq gnus-message-buffer (current-buffer))) (list (quote set) (quote (make-local-variable (quote gnus-message-group-art))) (list (quote cons) group article)) (list (quote set) (quote (make-local-variable (quote gnus-newsgroup-name))) group) (quote ((when gnus-message-highlight-citation (gnus-message-citation-mode 1)) (gnus-run-hooks (quote gnus-message-setup-hook)) (if (eq major-mode (quote message-mode)) (let ((mbl1 mml-buffer-list)) (setq mml-buffer-list mbl) (set (make-local-variable ...) mbl1) (gnus-make-local-hook (quote kill-buffer-hook)) (gnus-make-local-hook (quote change-major-mode-hook)) (add-hook (quote change-major-mode-hook) (quote mml-destroy-buffers) nil t) (add-hook (quote kill-buffer-hook) (quote mml-destroy-buffers) t t)) (mml-destroy-buffers) (setq mml-buffer-list mbl))))) (quote (message-hide-headers)) (quote (gnus-add-buffer)) (backquote-list* (quote gnus-configure-windows) config (quote (t))) (quote ((run-hooks (quote post-command-hook)) (set-buffer-modified-p nil))))
  (\` (let (((\, winconf) (current-window-configuration)) ((\, winconf-name) gnus-current-window-configuration) ((\, buffer) (buffer-name (current-buffer))) ((\, article) gnus-article-reply) ((\, yanked) gnus-article-yanked-articles) ((\, group) gnus-newsgroup-name) (message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))) (setq mml-buffer-list nil) (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc)) (add-hook (quote message-mode-hook) (lambda nil (setq message-newsreader (setq message-mailer (gnus-extended-version))))) (add-hook (quote message-mode-hook) (if (memq (\, config) (quote (reply-yank reply))) (lambda nil (gnus-configure-posting-styles (\, group))) (lambda nil (let (gnus-article-copy) (gnus-configure-posting-styles (\, group)))))) (gnus-alist-pull (quote (\, (intern gnus-draft-meta-information-header))) message-required-headers) (when (and (\, group) (not (string= (\, group) ""))) (push (cons (intern gnus-draft-meta-information-header) (gnus-inews-make-draft (or (\, yanked) (\, article)))) message-required-headers)) (unwind-protect (progn (\,@ forms)) (gnus-inews-add-send-actions (\, winconf) (\, buffer) (\, article) (\, config) (\, yanked) (\, winconf-name)) (setq gnus-message-buffer (current-buffer)) (set (make-local-variable (quote gnus-message-group-art)) (cons (\, group) (\, article))) (set (make-local-variable (quote gnus-newsgroup-name)) (\, group)) (when gnus-message-highlight-citation (gnus-message-citation-mode 1)) (gnus-run-hooks (quote gnus-message-setup-hook)) (if (eq major-mode (quote message-mode)) (let ((mbl1 mml-buffer-list)) (setq mml-buffer-list mbl) (set (make-local-variable (quote mml-buffer-list)) mbl1) (gnus-make-local-hook (quote kill-buffer-hook)) (gnus-make-local-hook (quote change-major-mode-hook)) (add-hook (quote change-major-mode-hook) (quote mml-destroy-buffers) nil t) (add-hook (quote kill-buffer-hook) (quote mml-destroy-buffers) t t)) (mml-destroy-buffers) (setq mml-buffer-list mbl))) (message-hide-headers) (gnus-add-buffer) (gnus-configure-windows (\, config) t) (run-hooks (quote post-command-hook)) (set-buffer-modified-p nil)))
  (let ((winconf (make-symbol "gnus-setup-message-winconf")) (buffer (make-symbol "gnus-setup-message-buffer")) (article (make-symbol "gnus-setup-message-article")) (yanked (make-symbol "gnus-setup-yanked-articles")) (group (make-symbol "gnus-setup-message-group"))) (\` (let (((\, winconf) (current-window-configuration)) ((\, winconf-name) gnus-current-window-configuration) ((\, buffer) (buffer-name (current-buffer))) ((\, article) gnus-article-reply) ((\, yanked) gnus-article-yanked-articles) ((\, group) gnus-newsgroup-name) (message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))) (setq mml-buffer-list nil) (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc)) (add-hook (quote message-mode-hook) (lambda nil (setq message-newsreader (setq message-mailer (gnus-extended-version))))) (add-hook (quote message-mode-hook) (if (memq (\, config) (quote (reply-yank reply))) (lambda nil (gnus-configure-posting-styles (\, group))) (lambda nil (let (gnus-article-copy) (gnus-configure-posting-styles ...))))) (gnus-alist-pull (quote (\, (intern gnus-draft-meta-information-header))) message-required-headers) (when (and (\, group) (not (string= (\, group) ""))) (push (cons (intern gnus-draft-meta-information-header) (gnus-inews-make-draft (or ... ...))) message-required-headers)) (unwind-protect (progn (\,@ forms)) (gnus-inews-add-send-actions (\, winconf) (\, buffer) (\, article) (\, config) (\, yanked) (\, winconf-name)) (setq gnus-message-buffer (current-buffer)) (set (make-local-variable (quote gnus-message-group-art)) (cons (\, group) (\, article))) (set (make-local-variable (quote gnus-newsgroup-name)) (\, group)) (when gnus-message-highlight-citation (gnus-message-citation-mode 1)) (gnus-run-hooks (quote gnus-message-setup-hook)) (if (eq major-mode (quote message-mode)) (let ((mbl1 mml-buffer-list)) (setq mml-buffer-list mbl) (set (make-local-variable ...) mbl1) (gnus-make-local-hook (quote kill-buffer-hook)) (gnus-make-local-hook (quote change-major-mode-hook)) (add-hook (quote change-major-mode-hook) (quote mml-destroy-buffers) nil t) (add-hook (quote kill-buffer-hook) (quote mml-destroy-buffers) t t)) (mml-destroy-buffers) (setq mml-buffer-list mbl))) (message-hide-headers) (gnus-add-buffer) (gnus-configure-windows (\, config) t) (run-hooks (quote post-command-hook)) (set-buffer-modified-p nil))))
  (lambda (config &rest forms) (let ((winconf (make-symbol "gnus-setup-message-winconf")) (buffer (make-symbol "gnus-setup-message-buffer")) (article (make-symbol "gnus-setup-message-article")) (yanked (make-symbol "gnus-setup-yanked-articles")) (group (make-symbol "gnus-setup-message-group"))) (\` (let (((\, winconf) (current-window-configuration)) ((\, winconf-name) gnus-current-window-configuration) ((\, buffer) (buffer-name (current-buffer))) ((\, article) gnus-article-reply) ((\, yanked) gnus-article-yanked-articles) ((\, group) gnus-newsgroup-name) (message-header-setup-hook (copy-sequence message-header-setup-hook)) (mbl mml-buffer-list) (message-mode-hook (copy-sequence message-mode-hook))) (setq mml-buffer-list nil) (add-hook (quote message-header-setup-hook) (quote gnus-inews-insert-gcc)) (add-hook (quote message-mode-hook) (lambda nil (setq message-newsreader (setq message-mailer ...)))) (add-hook (quote message-mode-hook) (if (memq (\, config) (quote ...)) (lambda nil (gnus-configure-posting-styles ...)) (lambda nil (let ... ...)))) (gnus-alist-pull (quote (\, (intern gnus-draft-meta-information-header))) message-required-headers) (when (and (\, group) (not (string= ... ""))) (push (cons (intern gnus-draft-meta-information-header) (gnus-inews-make-draft ...)) message-required-headers)) (unwind-protect (progn (\,@ forms)) (gnus-inews-add-send-actions (\, winconf) (\, buffer) (\, article) (\, config) (\, yanked) (\, winconf-name)) (setq gnus-message-buffer (current-buffer)) (set (make-local-variable (quote gnus-message-group-art)) (cons (\, group) (\, article))) (set (make-local-variable (quote gnus-newsgroup-name)) (\, group)) (when gnus-message-highlight-citation (gnus-message-citation-mode 1)) (gnus-run-hooks (quote gnus-message-setup-hook)) (if (eq major-mode (quote message-mode)) (let (...) (setq mml-buffer-list mbl) (set ... mbl1) (gnus-make-local-hook ...) (gnus-make-local-hook ...) (add-hook ... ... nil t) (add-hook ... ... t t)) (mml-destroy-buffers) (setq mml-buffer-list mbl))) (message-hide-headers) (gnus-add-buffer) (gnus-configure-windows (\, config) t) (run-hooks (quote post-command-hook)) (set-buffer-modified-p nil)))))((cond (yank (quote reply-yank)) (article-buffer (quote reply)) (t (quote message))) (let* ((group (or group gnus-newsgroup-name)) (charset (gnus-group-name-charset nil group)) (pgroup group) to-address to-group mailing-list to-list newsgroup-p) (when group (setq to-address (gnus-parameter-to-address group) to-group (gnus-group-find-parameter group (quote to-group)) to-list (gnus-parameter-to-list group) newsgroup-p (gnus-group-find-parameter group (quote newsgroup)) mailing-list (when gnus-mailing-list-groups (string-match gnus-mailing-list-groups group)) group (gnus-group-name-decode (gnus-group-real-name group) charset))) (if (or (and to-group (gnus-news-group-p to-group)) newsgroup-p force-news (and (gnus-news-group-p (or pgroup gnus-newsgroup-name) (or header gnus-current-article)) (not mailing-list) (not to-list) (not to-address))) (if post (message-news (or to-group (and (not (gnus-virtual-group-p pgroup)) group))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-followup (if (or newsgroup-p force-news) (if (save-restriction (article-narrow-to-head) (message-fetch-field "newsgroups")) nil "") to-group))) (if post (progn (message-mail (or to-address to-list)) (when (and (not to-list) (not to-address) add-to-list) (push (list (quote gnus-inews-add-to-address) pgroup) message-send-actions))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-wide-reply to-address))) (when yank (gnus-inews-yank-articles yank))))
  (gnus-setup-message (cond (yank (quote reply-yank)) (article-buffer (quote reply)) (t (quote message))) (let* ((group (or group gnus-newsgroup-name)) (charset (gnus-group-name-charset nil group)) (pgroup group) to-address to-group mailing-list to-list newsgroup-p) (when group (setq to-address (gnus-parameter-to-address group) to-group (gnus-group-find-parameter group (quote to-group)) to-list (gnus-parameter-to-list group) newsgroup-p (gnus-group-find-parameter group (quote newsgroup)) mailing-list (when gnus-mailing-list-groups (string-match gnus-mailing-list-groups group)) group (gnus-group-name-decode (gnus-group-real-name group) charset))) (if (or (and to-group (gnus-news-group-p to-group)) newsgroup-p force-news (and (gnus-news-group-p (or pgroup gnus-newsgroup-name) (or header gnus-current-article)) (not mailing-list) (not to-list) (not to-address))) (if post (message-news (or to-group (and (not ...) group))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-followup (if (or newsgroup-p force-news) (if (save-restriction ... ...) nil "") to-group))) (if post (progn (message-mail (or to-address to-list)) (when (and (not to-list) (not to-address) add-to-list) (push (list ... pgroup) message-send-actions))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-wide-reply to-address))) (when yank (gnus-inews-yank-articles yank))))
  (let ((gnus-article-reply (and article-buffer (gnus-summary-article-number))) (gnus-article-yanked-articles yank) (add-to-list gnus-add-to-list)) (gnus-setup-message (cond (yank (quote reply-yank)) (article-buffer (quote reply)) (t (quote message))) (let* ((group (or group gnus-newsgroup-name)) (charset (gnus-group-name-charset nil group)) (pgroup group) to-address to-group mailing-list to-list newsgroup-p) (when group (setq to-address (gnus-parameter-to-address group) to-group (gnus-group-find-parameter group (quote to-group)) to-list (gnus-parameter-to-list group) newsgroup-p (gnus-group-find-parameter group (quote newsgroup)) mailing-list (when gnus-mailing-list-groups (string-match gnus-mailing-list-groups group)) group (gnus-group-name-decode (gnus-group-real-name group) charset))) (if (or (and to-group (gnus-news-group-p to-group)) newsgroup-p force-news (and (gnus-news-group-p (or pgroup gnus-newsgroup-name) (or header gnus-current-article)) (not mailing-list) (not to-list) (not to-address))) (if post (message-news (or to-group (and ... group))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-followup (if (or newsgroup-p force-news) (if ... nil "") to-group))) (if post (progn (message-mail (or to-address to-list)) (when (and ... ... add-to-list) (push ... message-send-actions))) (set-buffer gnus-article-copy) (gnus-msg-treat-broken-reply-to) (message-wide-reply to-address))) (when yank (gnus-inews-yank-articles yank)))))
  gnus-post-news(nil "gmane.emacs.gnus.general" [77148 "Re: How to load No Gnus?" "Harry Putnam <reader@newsguy.com>" #("Tue, 22 Feb 2011 23:12:39 -0600" 0 1 (gnus-time (19812 38727))) "<87sjvfmj08.fsf@newsguy.com>" "<87hbbvg8nx.fsf@gmail.com>" 3947 41 "news.gmane.org gmane.emacs.gnus.general:77148" nil] "*Article gmane.emacs.gnus.general*" (77148) nil nil)
  (let ((headers (gnus-summary-article-header (gnus-summary-article-number))) (gnus-newsgroup-name gnus-newsgroup-name)) (gnus-post-news nil gnus-newsgroup-name headers gnus-article-buffer yank nil force-news) (gnus-summary-handle-replysign))
  gnus-summary-followup((77148) nil)
  gnus-summary-followup-with-original(nil)
  call-interactively(gnus-summary-followup-with-original nil nil)

Re: Bug in current v14 - no followup or reply possible

[Erik Colson]

Harry Putnam <reader@newsguy.com> writes:

> I guess no one else besides Steiner and me are noticing this problem,
> but for me it is thoroughly reproducable so much so that I have to
> fall back to my older v11 to be able to post at all.

Well no, I had the problem too. But the patch sent to the list solved
the problem...

Best
-- 
erik colson
ecocode.net

Re: Bug in current v14 - no followup or reply possible

[Lars Ingebrigtsen]

Harry Putnam <reader@newsguy.com> writes:

> Any attemp to follow up or reply in v14 gets the error below in the
> backtrace:
>
> Debugger entered--Lisp error: (void-variable winconf-name)

Should be fixed now.

-- 
(domestic pets only, the antidote for overdose, milk.)
  larsi@gnus.org * Lars Magne Ingebrigtsen

Re: Bug in current v14 - no followup or reply possible

[Harry Putnam]

Erik Colson <eco@ecocode.net> writes:

> Harry Putnam <reader@newsguy.com> writes:
>
>> I guess no one else besides Steiner and me are noticing this problem,
>> but for me it is thoroughly reproducable so much so that I have to
>> fall back to my older v11 to be able to post at all.
>
> Well no, I had the problem too. But the patch sent to the list solved
> the problem...

Looking for messages from `colson' in the last 300 posts, I don't see
your patch.

Re: Bug in current v14 - no followup or reply possible

[Erik Colson]

Harry Putnam <reader@newsguy.com> writes:

> Erik Colson <eco@ecocode.net> writes:
>
>> Harry Putnam <reader@newsguy.com> writes:
>>
>>> I guess no one else besides Steiner and me are noticing this problem,
>>> but for me it is thoroughly reproducable so much so that I have to
>>> fall back to my older v11 to be able to post at all.
>>
>> Well no, I had the problem too. But the patch sent to the list solved
>> the problem...
>
> Looking for messages from `colson' in the last 300 posts, I don't see
> your patch.
>
>

Of course not. The patch was not mine ;)
Here is the mail from David with the patch included.
But, I think it has been applied to the git repo, so you might just
check out the latest version from it...

Best

-- 
erik colson
ecocode.net



From: David Edmondson <dme@dme.org>
Subject: [PATCH] (gnus-setup-message): Declare `winconf-name'.
To: ding@gnus.org
Cc: David Edmondson <dme@dme.org>
Date: Tue, 22 Feb 2011 09:47:15 +0000 (1 day, 6 hours, 7 minutes ago)

---
 lisp/gnus-msg.el |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 29ac431..d715fc8 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -383,6 +383,7 @@ Thank you for your help in stamping out bugs.
 (defvar gnus-article-reply nil)
 (defmacro gnus-setup-message (config &rest forms)
   (let ((winconf (make-symbol "gnus-setup-message-winconf"))
+	(winconf-name (make-symbol "gnus-setup-message-winconf-name"))
 	(buffer (make-symbol "gnus-setup-message-buffer"))
 	(article (make-symbol "gnus-setup-message-article"))
 	(yanked (make-symbol "gnus-setup-yanked-articles"))

Re: Bug in current v14 - no followup or reply possible

[Harry Putnam]

Lars Ingebrigtsen <larsi@gnus.org> writes:

> Harry Putnam <reader@newsguy.com> writes:
>
>> Any attemp to follow up or reply in v14 gets the error below in the
>> backtrace:
>>
>> Debugger entered--Lisp error: (void-variable winconf-name)
>
> Should be fixed now.

Yup, now working with update just now (02/23/11 10:02:55 3)

Thanks... really great to see you back in what looks like full tilt
mode.  I haven't been keeping up so may be a little belated thanks for
your good work. (Goes ditto for too many others to mention here)

Re: Bug in current v14 - no followup or reply possible

[Harry Putnam]

Erik Colson <eco@ecocode.net> writes:

> Harry Putnam <reader@newsguy.com> writes:
>
>> Erik Colson <eco@ecocode.net> writes:
>>
>>> Harry Putnam <reader@newsguy.com> writes:
>>>
>>>> I guess no one else besides Steiner and me are noticing this problem,
>>>> but for me it is thoroughly reproducable so much so that I have to
>>>> fall back to my older v11 to be able to post at all.
>>>
>>> Well no, I had the problem too. But the patch sent to the list solved
>>> the problem...
>>
>> Looking for messages from `colson' in the last 300 posts, I don't see
>> your patch.
>>
>>
>
> Of course not. The patch was not mine ;)

Good reason hehe... but your message made it sound like it was yours.
Sorry for my misread.

> Here is the mail from David with the patch included.
> But, I think it has been applied to the git repo, so you might just
> check out the latest version from it...

Yes its all working now, but one further comment about that patch:

Of course I saw I that patch, but I'll tell you, it was not made clear
in any way what the heck it was supposed to do in subject or message
body, unless you happened to notice the term `winconf-name' in subject
and already new that term showed up in back-traces of the problem.

Further, the patch failed for Ted Z.  So it was not clear at all what
it was for or even if it worked.