 ;; for the currently-active code completion.
 (defun clang-backspace ()
   (interactive)
-  (delete-backward-char 1)
+  (delete-char -1)
   (clang-update-filter))
 
 ;; Invoked when the user types the delete key to update the filter
 ;; for the currently-active code completion.
 (defun clang-delete ()
   (interactive)
-  (delete-backward-char 1)
+  (delete-char -1)
   (clang-update-filter))
 
 ;; Set up the keymap for the Clang minor mode.

  nil
  " Clang"
  clang-completion-mode-map)


  :group 'clang-completion-mode)

;;; The prefix header to use with Clang code completion. 
(defvar clang-completion-prefix-header "")

;;; The substring we will use to filter completion results
(defvar clang-completion-substring "")

;;; The current completion buffer
(defvar clang-completion-buffer nil)

(defvar clang-result-string "")

;;; Compute the current line in the buffer	
(defun current-line ()
