Re: gnus-registry text property removal question (was: [bug]Malformed -*- line)

[Kenichi Handa]

In article <address@hidden>, CHENG Gao <address@hidden> writes:

> *On Wed, 27 Sep 2006 13:20:12 -0400
> * Ted Zlatanov <address@hidden> climbed out of the dark hell and cried out:


> > I noticed this problem with the gnus-registry before, and I thought
> > the set-text-properties call would fix it (it's called before the
> > buffer is written).  This is the code:
> >
> >     (let ((coding-system-for-write gnus-ding-file-coding-system)
> >           (standard-output (current-buffer)))
> >       (gnus-gnus-to-quick-newsrc-format t "gnus registry startup file" 
> > 'gnus-registry-alist)
> >       (gnus-registry-cache-whitespace file)
> >       (set-text-properties (point-min) (point-max) nil)
> >       (save-buffer))
> >
> > which is run by default when you save (if you customize
> > gnus-save-startup-file-via-temp-buffer to be nil, the
> > gnus-with-output-to-file working-file routine is called instead, but
> > by default it's t).

It just removes text properties of a buffer being saved.
That is useless.  As I wrote before, the text property must
be removed from a string that is printed into that buffer.

It seems that the buffer contents is built up by something
like this code:

     (let ((str "abc"))
       (put-text-property 0 3 'auto-composed t str)
       (print str))

I don't know which function builds up the contents of that
buffer.  Is it gnus-gnus-to-quick-newsrc-format?  Then that
function (or what called from it) should be fixed.

---
Kenichi Handa
address@hidden