Gnus development mailing list
 help / color / mirror / Atom feed
* Read-only message separator
@ 2011-02-04 19:41 Michael Piotrowski
  2011-02-04 21:31 ` Lars Ingebrigtsen
  0 siblings, 1 reply; 10+ messages in thread
From: Michael Piotrowski @ 2011-02-04 19:41 UTC (permalink / raw)
  To: ding

Hi,

The change in `message-setup-1' to insert the mail-header-separator with
read-only and intangible properties set (commit
bd10f37e4630719920f82122d7c7ae7523567762) doesn't work for me (on XEmacs
21.4.22).  When trying to compose a message, I get

#v+
Debugger entered--Lisp error: (buffer-read-only #<buffer "*unsent mail*">)
  insert("")
  (progn (insert message-default-mail-headers) (or (bolp) (insert ?\n)))
  (if message-default-mail-headers (progn (insert message-default-mail-headers) (or ... ...)))
  (when message-default-mail-headers (insert message-default-mail-headers) (or (bolp) (insert ?\n)))
  (progn (when message-default-mail-headers (insert message-default-mail-headers) (or ... ...)) (message-generate-headers (message-headers-to-generate ... message-generate-headers-first ...)))
  (if (message-mail-p) (progn (when message-default-mail-headers ... ...) (message-generate-headers ...)))
  (when (message-mail-p) (when message-default-mail-headers (insert message-default-mail-headers) (or ... ...)) (message-generate-headers (message-headers-to-generate ... message-generate-headers-first ...)))
  (let ((message-generate-headers-first ...)) (when (message-news-p) (when message-default-news-headers ... ...) (message-generate-headers ...)) (when (message-mail-p) (when message-default-mail-headers ... ...) (message-generate-headers ...)))
  message-setup-1(((To . "") (Subject . "")) nil nil nil)
  message-setup(((To . "") (Subject . "")) nil nil nil nil nil)
  message-mail()
  gnus-group-mail(nil)
  call-interactively(gnus-group-mail)
#v-

It works if I change

  'read-only t

to

  'read-only nil

in the call to `propertize' in `message-setup-1'.

An XEmacs issue?

Thanks and greetings

-- 
Dr.-Ing. Michael Piotrowski, M.A.                   <mxp@dynalabs.de>
Public key at <http://www.dynalabs.de/mxp/pubkey.txt> (ID 0x1614A044)




^ permalink raw reply	[flat|nested] 10+ messages in thread

end of thread, other threads:[~2011-02-21 23:20 UTC | newest]

Thread overview: 10+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2011-02-04 19:41 Read-only message separator Michael Piotrowski
2011-02-04 21:31 ` Lars Ingebrigtsen
2011-02-04 21:36   ` Lars Ingebrigtsen
2011-02-04 21:47     ` Lars Ingebrigtsen
2011-02-05  9:42       ` Michael Piotrowski
2011-02-07 18:19         ` Ted Zlatanov
2011-02-14  3:20           ` Lars Ingebrigtsen
2011-02-14 15:04             ` Ted Zlatanov
2011-02-20 17:14             ` Julien Danjou
2011-02-21 23:20               ` Lars Ingebrigtsen

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).