summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDavid Maus <dmaus@ictsoc.de>2011-06-01 06:53:21 +0200
committerDavid Maus <dmaus@ictsoc.de>2011-06-01 08:30:20 +0200
commit00040e708c68af0ada8ae17a74485304d3d5a817 (patch)
tree5d4ec1e524da77499bf127a7518fe252bd88332f
parentf4f20ad5c830a169c7713cb99bfd4127c9c3b32d (diff)
downloadorg-mode-00040e708c68af0ada8ae17a74485304d3d5a817.tar.gz
Use `delete-char' instead of `delete-backward-char'
* org.el (org-self-insert-command): Use `delete-char' instead of `delete-backward-char'. * org-table.el (orgtbl-self-insert-command): Dto. According to the doc string `delete-backward-char' "is meant for interactive use only; from Lisp, better use `delete-char' with a negated argument."
-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 30c4ddd..20b89c3 100644
--- a/lisp/org-table.el
+++ b/lisp/org-table.el
@@ -4030,7 +4030,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)
+ (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 88976e2..c2b18c6 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -16921,7 +16921,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)
+ (delete-char -1)
(goto-char (match-beginning 0))
(self-insert-command N)))
(t