From: Noah Friedman <friedman@splode.com>
Date: Tue, 13 Nov 2007 18:52:00 +0000 (+0000)
Subject: Add `backward-delete-char-untabify' to the list of bindings to remap when
X-Git-Tag: emacs-pretest-23.0.90~9762
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=84b4b70d64538d8946487ef5fc60321fecfea152;p=emacs.git

Add `backward-delete-char-untabify' to the list of bindings to remap when
`calc-scan-for-dels' is non-nil.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cf233cfadb8..dae31a218d3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-13  Noah Friedman  <friedman@splode.com>
+
+	* calc/calc.el: Add `backward-delete-char-untabify' to the list of
+	bindings to remap when `calc-scan-for-dels' is non-nil.
+
 2007-11-13  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* emacs-lisp/byte-opt.el (byte-compile-trueconstp): Handle more
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 5cfccb4f8db..946a1eab06b 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -1009,6 +1009,7 @@ If nil, selections displayed but ignored.")
       (if calc-scan-for-dels
 	  (append (where-is-internal 'delete-backward-char global-map)
 		  (where-is-internal 'backward-delete-char global-map)
+		  (where-is-internal 'backward-delete-char-untabify global-map)
 		  '("\C-d"))
 	'("\177" "\C-d")))