Re: Inhibiting read-only

[Jambunathan K]

Juanma Barranquero <address@hidden> writes:

> I understand Lars' question as having a read-only buffer (not a
> read-only text property set from (point-min) to (point-max)) and
> wanting to deactivate it for some segments of the text.

I meant this.  M-: the below form.  You will see that first line is
editable.  But the second and third lines cannot be edited.

(with-current-buffer (generate-new-buffer  "read-only")
  (pop-to-buffer (current-buffer))
  (insert "first line\nsecond line\nthird line")  
  (goto-char (point-min))                   
  (add-text-properties (point-at-bol) (point-at-eol) '(read-only
                                                       editable))
  (forward-line 1)
  (add-text-properties (point) (point-max) '(read-only t))
  (setq inhibit-read-only '(editable)))