Fix small frame gutter glitches.
25 years, 1 month
Andy Piper
Andy Piper
Multiple frames don't work too well with gutters without these fixes.
andy
2000-03-02 Andy Piper <andy(a)xemacs.org>
* gutter.c (specifier_vars_of_gutter): cosmetic changes.
* frame.c (Fmake_frame): make sure the gutters get initialized
after the frame is visible.
(set_frame_selected_window): re-arrange compilation macros a
little.
(change_frame_size_1): mark gutters changed.
* device.c (Fset_device_class): mark gutters changed.
--------------------------------------------------------------
Dr Andy Piper
Senior Consultant Architect, BEA Systems Ltd
- 1 participants
- 0 comments
`with-string-as-buffer-contents' bug
25 years, 1 month
SL Baur
SL Baur
[The same bug exists in `with-output-to-string']
A short test case shows the problem.
(let (a1 a2)
(with-string-as-buffer-contents "foo"
(setq a1 (buffer-substring (point-min) (point-max)))
(with-string-as-buffer-contents "bar"
(setq a2 (buffer-substring (point-min) (point-max))))
(message "a2 = `%s', a1 = `%s', buffer = `%s'"
a2 a1 (buffer-substring (point-min) (point-max)))))
I see output:
a2 = `bar', a1 = `foo', buffer = `'
The problem in both functions is that `get-buffer-create' is called
with a constant string. Recursive invocations reuse existing buffers
and when the recursive call finishes, the outer form's buffer is
trashed.
- 1 participants
- 0 comments
Re: deja fix
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Stephen Tse <stephent(a)sfu.ca> writes:
> I understood and I tried that. Lars said they have fixed their
> nnweb.el already in *beta* version of gnus. But I use the stable
> version that comes with 21.2.
Aha I unserstand. Gnus 5.8 seems to be stabilizing, so it is more
likely (and less effort) we will upgrade to that soon.
Jan
- 1 participants
- 0 comments
Re: deja fix
25 years, 1 month
Stephen Tse
Stephen Tse
Jan Vroonhof <vroonhof(a)math.ethz.ch> writes:
> Stephen Tse <stephent(a)sfu.ca> writes:
>
> > Deja interface has just changed.
>
> :-(
>
> > I hack this for nnweb.el so that I
> > can browse deja results happily in gnus.
>
> You should send this to ding(a)gnus.org
I understood and I tried that. Lars said they have fixed their
nnweb.el already in *beta* version of gnus. But I use the stable
version that comes with 21.2.
Plus, I use deja daily while deja changes its interface nearly
monthly. I don't think ding team is available to fix it quick enough.
- 1 participants
- 0 comments
Re: crash
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Michael Harnois <mdharnois(a)home.com> writes:
> I'm too stupid to know if this is xemacs or gnus.
If it is a crash, then it is xemacs and you need to give more info. C
backtrace and version to be precise ('latest cvs' is very ambiguous)
Jan
- 1 participants
- 0 comments
Re: deja fix
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Stephen Tse <stephent(a)sfu.ca> writes:
> Deja interface has just changed.
:-(
> I hack this for nnweb.el so that I
> can browse deja results happily in gnus.
You should send this to ding(a)gnus.org
Jan
- 1 participants
- 0 comments
deja fix
25 years, 1 month
Stephen Tse
Stephen Tse
Deja interface has just changed. I hack this for nnweb.el so that I
can browse deja results happily in gnus.
Hope you find this useful.
http://www.sfu.ca/~stephent/emacs/deja.el
- 1 participants
- 0 comments
crash
25 years, 1 month
Michael Harnois
Michael Harnois
I'm too stupid to know if this is xemacs or gnus. Trying to open a
MIME message with a picture inside (I think, haven't succeeded in
opening it yet) ... Quite repeatable. Latest CVS of both programs.
Lisp backtrace follows:
# bind (string c)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (temp-buffer string)
mail-header-remove-comments("text/plain; charset=\"US-ASCII\"")
# bind (ttoken stoken ntoken prev-value display-name mailbox c display-string parameters attribute value type subtype number encoded prev-attribute)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (temp-buffer string)
mail-header-parse-content-type("text/plain; charset=\"US-ASCII\"")
# (condition-case ... . ((error)))
# (unwind-protect ...)
# bind (ct ctl type subtype cte cd description id result)
# (unwind-protect ...)
# bind (no-strict-mime)
mm-dissect-buffer(t)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (end parts start close-delimiter boundary ctl)
mm-dissect-multipart(("multipart/mixed" (boundary . "part8_d3.21100e4.25e8bfd4_boundary")))
# bind (ct ctl type subtype cte cd description id result)
# (unwind-protect ...)
# bind (no-strict-mime)
mm-dissect-buffer()
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<13>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<13>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<13>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<14>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<11>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<11>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<11>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<12>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<9>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<9>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<9>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<10>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<7>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<7>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<7>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<8>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<5>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<5>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<5>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<6>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*<3>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*<3>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*<3>"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<4>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# bind (gnus-article-mime-handles gnus-newsgroup-charset)
# (unwind-protect ...)
# (unwind-protect ...)
# bind (b charset gnus-displaying-mime handles handle)
mm-inline-message((#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (function type handle)
mm-display-inline((#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (method type)
# (unwind-protect ...)
# bind (no-default handle)
mm-display-part((#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil) t)
# bind (mail-parse-charset mail-parse-ignored-charsets beg)
byte-code("..." [ignored string-match type throw nil mm-inline-override-p handle 4 "inline" mm-attachment-override-p not-attachment mm-automatic-display-p mm-inlined-p mm-automatic-external-display-p t display split-string mm-handle-media-type "/" "text" text gnus-article-mime-handle-alist id gnus-unbuttonized-mime-type-p gnus-insert-mime-button gnus-article-insert-newline move beg -2 gnus-newsgroup-charset (set-buffer gnus-summary-buffer) ((error)) gnus-newsgroup-ignored-charsets mail-parse-ignored-charsets mail-parse-charset mm-display-part mm-insert-inline mm-get-part gnus-treat-article gnus-article-mime-handles 1] 7)
# (catch ignored ...)
# bind (type ignored not-attachment move display text handle)
gnus-mime-display-single((#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil))
# bind (handle)
gnus-mime-display-part((#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil))
mapcar(gnus-mime-display-part ((#<buffer " *mm*"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handles)
gnus-mime-display-mixed(((#<buffer " *mm*"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (handle)
gnus-mime-display-part(("multipart/mixed" (#<buffer " *mm*"> ("text/plain" ...) 7bit (lambda nil ...) nil nil nil nil) (#<buffer " *mm*<2>"> ("message/rfc822") nil nil ("inline") nil nil nil)))
# bind (gnus-displaying-mime display e b type name handle buffer-read-only handles)
# (unwind-protect ...)
# bind (save-selected-window-window)
# (unwind-protect ...)
# bind (ihandles)
gnus-display-mime()
# bind (gnus-article-buffer buffer-read-only)
gnus-article-prepare-display()
# (unwind-protect ...)
# bind (result group gnus-tmp-internal-hook summary-buffer gnus-article)
# (unwind-protect ...)
# bind (header all-headers article)
gnus-article-prepare(23525 nil)
# bind (all-header article)
gnus-summary-display-article(23525 nil)
# (unwind-protect ...)
# bind (article all-headers gnus-summary-display-article-function article pseudo force all-headers)
gnus-summary-select-article(nil nil pseudo)
# bind (lines)
gnus-summary-scroll-up(1)
# bind (command-debug-status)
call-interactively(gnus-summary-scroll-up)
# (condition-case ... . error)
# (catch top-level ...)
--
Michael D. Harnois, Redeemer Lutheran Church, Washburn, IA
mdharnois(a)home.com aa0bt(a)aa0bt.ampr.org
God shows his contempt for wealth by the kind of person He selects
to receive it. -- Austin O'Malley
- 1 participants
- 0 comments