RE: bind commands that change buffer contents to `undefined' whenread-only?

[Drew Adams]

> I've decided not to change the way these things work, so this
> thread is not going to do something useful.

OK. Let me mention in parting on this that in my own code I now respect the
value of `kill-read-only-ok': If it is non-nil, then I don't bind commands
that kill text to `undefined'. IOW:

(defcustom buffer-modifying-cmds
  (append
   (and kill-read-only-ok
        '(backward-kill-paragraph backward-kill-sentence
          backward-kill-sexp backward-kill-word clipboard-kill-region
          comint-kill-input comment-kill kill-backward-up-list
          kill-comment kill-line kill-paragraph kill-rectangle
          kill-region kill-sentence kill-sexp kill-whole-line
          kill-word mouse-kill))
   '(align-newline-and-indent backward-delete-char
     backward-delete-char-untabify
     bookmark-insert bookmark-insert-location
     canonically-space-region
     capitalize-region capitalize-word c-backslash-region
     c-context-line-break center-line center-paragraph center-region
     c-fill-paragraph c-hungry-delete-backwards
     c-hungry-delete-forward c-indent-command c-indent-defun
     c-indent-exp clear-rectangle comint-truncate-buffer comment-dwim
     comment-indent-new-line comment-region
     comment-or-uncomment-region complete-symbol compose-last-chars
     compose-region dabbrev-completion dabbrev-expand decompose-region
     delete-backward-char delete-blank-lines delete-char
     delete-horizontal-space delete-indentation delete-matching-lines
     delete-non-matching-lines delete-pair delete-rectangle
     delete-region delete-trailing-whitespace
     delete-whitespace-rectangle delimit-columns-region
     downcase-region downcase-word edit-picture expand-abbrev
     expand-region-abbrevs fill-individual-paragraphs
     fill-nonuniform-paragraphs fill-paragraph fill-region
     fill-region-as-paragraph format-insert-file flush-lines
     ido-insert-buffer ido-insert-file increase-left-margin
     increase-right-margin indent-code-rigidly indent-for-comment
     indent-for-tab-command indent-line-function
     indent-new-comment-line indent-pp-sexp indent-region
     indent-rigidly insert-abbrevs insert-buffer insert-file
     insert-file-literally insert-kbd-macro insert-pair
     insert-parentheses insert-register insert-zippyism join-line
     justify-current-line just-one-space keep-lines
     lisp-complete-symbol
     lisp-fill-paragraph lisp-indent-line morse-region
     newline newline-and-indent open-line open-rectangle query-replace
     query-replace-regexp quoted-insert
     reindent-then-newline-and-indent replace-regexp replace-string
     repunctuate-sentences reverse-region rot13-region
     self-insert-command set-justification-center
     set-justification-full set-justification-left
     set-justification-none set-justification-right set-left-margin
     set-right-margin skeleton-pair-insert-maybe smiley-region
     sort-columns sort-fields sort-lines sort-numeric-fields
     sort-pages sort-paragraphs split-line string-insert-rectangle
     string-rectangle studlify-region table-delete-column
     table-delete-row table-heighten-cell table-insert
     table-insert-column table-insert-row table-insert-sequence
     table-justify table-shorten-cell table-span-cell table-split-cell
     table-split-cell-horizontally table-split-cell-vertically
     table-widen-cell tab-to-tab-stop tabify texinfo-format-region
     tildify-region time-stamp todo-insert-item translate-region
     transpose-chars transpose-lines transpose-paragraphs
     transpose-sentences transpose-sexps transpose-words ucs-insert
     uncomment-region unmorse-region untabify upcase-region
     upcase-word vc-insert-headers whitespace-cleanup
     whitespace-cleanup-region yank yank-pop yank-rectangle
     zap-to-char))
  "*Buffer-modifying commands used in `undefine-killer-commands'."
  :type '(repeat symbol))