Mercurial > hg > xemacs-beta
diff lisp/modes/cc-mode.el @ 159:3bb7ccffb0c0 r20-3b6
Import from CVS: tag r20-3b6
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:41:43 +0200 |
parents | 6b37e6ddd302 |
children |
line wrap: on
line diff
--- a/lisp/modes/cc-mode.el Mon Aug 13 09:40:48 2007 +0200 +++ b/lisp/modes/cc-mode.el Mon Aug 13 09:41:43 2007 +0200 @@ -481,8 +481,8 @@ This hook gets called after a line is indented by the mode." :type 'hook :group 'cc-indent) -(defcustom c-delete-function (if (fboundp 'backspace-or-delete) - 'backspace-or-delete +(defcustom c-delete-function (if (fboundp 'backward-or-forward-delete-char) + 'backward-or-forward-delete-char 'backward-delete-char-untabify) "*Function called by `c-electric-delete' when deleting characters." :type 'function @@ -1952,8 +1952,8 @@ (c-in-literal)) (funcall c-delete-function (prefix-numeric-value arg)) (let ((here (point))) - (if (and (boundp 'delete-erases-forward) - delete-erases-forward) + (if (and (boundp 'delete-key-deletes-forward) + delete-key-deletes-forward) (skip-chars-forward " \t\n") (skip-chars-backward " \t\n")) (if (/= (point) here)