summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2012-03-27 23:50:52 +0200
committerBastien Guerry <bzg@altern.org>2012-03-27 23:50:52 +0200
commit8d74c849623c57191e77f7c53c0ca751b3fd11eb (patch)
tree7bf0cd1020fe10ce25b2cfb418e5443bc3f97667
parent2a94e997f4d618832f8b030c4374b6ba0af90229 (diff)
downloadorg-mode-8d74c849623c57191e77f7c53c0ca751b3fd11eb.tar.gz
Use `backward-delete-char' instead of `delete-backward-char' to silent compiler.
* org-table.el (orgtbl-self-insert-command): Use `backward-delete-char' instead of `delete-backward-char' as this last command gets caught by the compiler which says to not use it in programs. `backward-delete-char' is just an alias for `delete-backward-char' which is internally remapped to `org-delete-backward-char' for optimization purpose. * org.el (org-self-insert-command): Ditto.
-rw-r--r--lisp/org-table.el2
-rw-r--r--lisp/org.el2
2 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-table.el b/lisp/org-table.el
index 6886281..a13b063 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -4154,7 +4154,7 @@ overwritten, and the table is not marked as requiring realignment."
(looking-at "[^|\n]* +|"))
(let (org-table-may-need-update)
(goto-char (1- (match-end 0)))
- (delete-backward-char 1)
+ (backward-delete-char 1)
(goto-char (match-beginning 0))
(self-insert-command N))
(setq org-table-may-need-update t)
diff --git a/lisp/org.el b/lisp/org.el
index ee015f2..d0703ee 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17626,7 +17626,7 @@ overwritten, and the table is not marked as requiring realignment."
(looking-at "[^|\n]* |"))
(let (org-table-may-need-update)
(goto-char (1- (match-end 0)))
- (delete-backward-char 1)
+ (backward-delete-char 1)
(goto-char (match-beginning 0))
(self-insert-command N)))
(t