And this right after I posted a success message to build-reports ...
Lisp backtrace follows:
ad-Orig-split-window(#<window on "*Summary nnml+private:inbox*" 0x7179>
20 nil)
(if (interactive-p) (call-interactively (quote ad-Orig-split-window))
(ad-Orig-split-window window chsize horflag))
)
(setq ad-return-value (if (interactive-p) (call-interactively ...) (ad-Orig-split-window
window chsize horflag)))
)
# bind (horizontally)
(let ((horizontally horflag)) (if (null chsize) (setq chsize ...)) (setq ad-return-value
(if ... ... ...)))
)
(if (eq parent (selected-window)) (let (...) (if ... ...) (popper-bury-output t) (prog1
... ...)) (let (...) (if ... ...) (setq ad-return-value ...)))
)
# bind (parent horizontally the-size)
(let ((the-size chsize) (horizontally horflag) (parent ...)) (if (eq parent ...) (let
... ... ... ...) (let ... ... ...)))
)
# bind (ad-return-value)
(let (ad-return-value) (let (... ... ...) (if ... ... ...)) ad-return-value)
)
# bind (horflag chsize window)
split-window(#<window on "*Summary nnml+private:inbox*" 0x7179>)
# bind (upper other window old-frame target-frame explicit-frame)
byte-code("..." [nil explicit-frame target-frame old-frame window
last-nonminibuf-frame selected-frame get-buffer buffer bufferp wrong-type-argument
pre-display-buffer-function not-this-window-p override-frame display-buffer-function throw
done buffer-dedicated-frame dedi frame-live-p window-buffer selected-window
display-buffer-1 buffer-name same-window-buffer-names assoc switch-to-buffer
same-window-regexps tem car string-match pop-up-frames 0 get-buffer-window
special-display-function special-display-buffer-names special-display-regexps
frame-selected-window pop-up-frame-function set-window-buffer pop-up-windows
frame-property minibuffer only window-dedicated-p frame-root-window split-height-threshold
window-min-height split-width-threshold window-min-width unsplittable get-largest-window
visible t window-frame window-height window-width window-leftmost-p window-rightmost-p
split-window other upper get-lru-window window-parent window-previous-child
window-next-child win!
dow-pixel-edges window-pixel-height enlarge-window 2 save-selected-window-window
((byte-code "À !«Â !À" ... 2)) select-window record-buffer] 7)
# (catch done ...)
# bind (override-frame not-this-window-p buffer)
display-buffer(#<buffer "*wide reply to Parson3333(a)aol.com*"> nil nil)
# bind (oldbuf buf window frame on-frame not-this-window-p bufname)
ad-Orig-pop-to-buffer("*wide reply to Parson3333(a)aol.com*" nil nil)
(setq ad-return-value (ad-Orig-pop-to-buffer bufname not-this-window-p on-frame))
)
(if (and parent (not ...)) (progn (popper-bury-output t) (setq ad-return-value ...)
(popper-select-window parent) (popper-show-output) (sit-for 0) (setq not-this-window-p
nil) (setq ad-return-value ...)) (setq ad-return-value (ad-Orig-pop-to-buffer bufname
not-this-window-p on-frame)))
)
# bind (parent the-buffer)
(let ((the-buffer bufname) (parent ...)) (if (and parent ...) (progn ... ... ... ... ...
... ...) (setq ad-return-value ...)))
)
# bind (ad-return-value)
(let (ad-return-value) (let (... ...) (if ... ... ...)) ad-return-value)
)
# bind (on-frame not-this-window-p bufname)
pop-to-buffer("*wide reply to Parson3333(a)aol.com*")
# bind (buffer name)
message-pop-to-buffer("*wide reply to Parson3333(a)aol.com*")
# bind (cur from subject date reply-to to cc references message-id follow-to
inhibit-point-motion-hooks message-this-is-mail mct never-mct gnus-warning wide
to-address)
message-reply(nil t)
# bind (to-address)
message-wide-reply(nil)
# bind (newsgroup-p to-list mailing-list to-group to-address pgroup group)
# (unwind-protect ...)
# bind (gnus-setup-message-winconf gnus-setup-message-buffer gnus-setup-message-article
gnus-setup-message-group message-header-setup-hook message-mode-hook gnus-article-reply
add-to-list force-news subject yank article-buffer header group post)
gnus-post-news(nil "nnml+private:inbox" [22713 "Re: lunch"
"Parson3333(a)aol.com" "Mon, 7 Feb 2000 17:45:15 EST"
"<70.f23a28.25d0a4fb(a)aol.com>" nil 0 11 "mharnois.workgroup.net
inbox:22713" nil] "*Article*" (22713) nil nil)
# bind (headers gnus-newsgroup-name force-news yank)
gnus-summary-followup((22713) nil)
# bind (force-news n)
gnus-summary-followup-with-original(nil)
# bind (command-debug-status)
call-interactively(gnus-summary-followup-with-original)
# (condition-case ... . error)
# (catch top-level ...)
Show replies by date