Hi all, On Mon, Jul 22, 2013 at 9:42 AM, Johann 'Myrkraverk' Oskarsson <johann(a)myrkraverk.com&gt; wrote: I've fixed the latter bug. The function erc-make-read-only used (point-max) instead of erc-insert-marker so parts of the input buffer got set to read only when truncating happened. While fixing this I also rewrote it to use extents directly instead of text-properties. There is no reason to worry about the prompt in this code since it's set read-only separately. Replace the definition in erc-goodies.el with: (defun erc-make-read-only () "Make all the text in the current buffer read-only. Put this function on `erc-insert-post-hook' and/or `erc-send-post-hook'." (let ((extent (car (extent-list nil nil nil nil 'name 'erc-read-only)))) (cond (extent (set-extent-endpoints extent (point-min) erc-insert-marker)) (t (setq extent (make-extent (point-min) erc-insert-marker)) (set-extent-property extent 'name 'erc-read-only) (set-extent-property extent 'read-only t))))) -- Johann I'm not from the internet, I just work there. _______________________________________________ XEmacs-Beta mailing list XEmacs-Beta(a)xemacs.org http://lists.xemacs.org/mailman/listinfo/xemacs-beta