version n0-14 no reply possible

version n0-14 no reply possible

[Harry Putnam]

I was having a bit of trouble getting verion 14, but finally got smart
enough to kill off the two daemon I had running from before and now
managed to 14 running.

I had to put it down right away though because I could not reply to
any messages.  All of F f R f would get the same error.

[ Note:tried this again just now # [HP 02/22/11_12:38:08  ] with
a freshly got copy of n0-14.

Is no one else seeing this problem?]

 
I set debug on error and got a 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" [77099 "Re: Possible bug.. but not sure in what" "Lars Ingebrigtsen <larsi@gnus.org>" #("Mon, 21 Feb 2011 19:20:04 -0800" 0 1 (gnus-time (19811 11108))) "<874o7wbvrv.fsf@gnus.org>" "<87r5b0pyy0.fsf@newsguy.com> <87vd0crcxi.fsf@gnus.org> <87ei70pxwz.fsf@newsguy.com>" 3317 13 "news.gmane.org gmane.emacs.gnus.general:77099" nil] "*Article gmane.emacs.gnus.general*" (77099) 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((77099) nil)
  gnus-summary-followup-with-original(nil)
  call-interactively(gnus-summary-followup-with-original nil nil)

Re: version n0-14 no reply possible

[Lars Ingebrigtsen]

Harry Putnam <reader@newsguy.com> writes:

> Debugger entered--Lisp error: (void-variable winconf-name)

This should now be fixed.

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

Re: version n0-14 no reply possible

[Harry Putnam]

Lars Ingebrigtsen <larsi@gnus.org> writes:

> Harry Putnam <reader@newsguy.com> writes:
>
>> Debugger entered--Lisp error: (void-variable winconf-name)
>
> This should now be fixed.

Yup, now working with update just now (02/23/11 10:02:55 3)
(Sorry to bug everyone twice with same report)

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)