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)