diff options
| author | Mauro Aranda <maurooaranda@gmail.com> | 2019-05-02 09:51:01 -0300 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2019-05-11 10:19:24 -0400 |
| commit | 40b3dcb7f7be92f0471e7a503ae8598c72100146 (patch) | |
| tree | eb7a3ffbda0a69bbb24206c47b7a71b3b11b5322 | |
| parent | cc67d6ef36a07f26364d63e524fcba6fe9cb2112 (diff) | |
| download | emacs-40b3dcb7f7be92f0471e7a503ae8598c72100146.tar.gz | |
Use characters, not symbols for table-cell-bindings
* lisp/textmodes/table.el (table-cell-bindings): Add missing '?', to
avoid confusion between symbols and characters in bindings. (Bug#35533)
| -rw-r--r-- | lisp/textmodes/table.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el index bed8b2fef27..f27c7058e71 100644 --- a/lisp/textmodes/table.el +++ b/lisp/textmodes/table.el @@ -930,16 +930,16 @@ This is always set to nil at the entry to `table-with-cache-buffer' before execu ;; refill the table cache. If the command were not listed fast ;; typing can cause unwanted cache refill. (defconst table-cell-bindings - '(([(control i)] . table-forward-cell) - ([(control I)] . table-backward-cell) + '(([(control ?i)] . table-forward-cell) + ([(control ?I)] . table-backward-cell) ([tab] . table-forward-cell) ([(shift backtab)] . table-backward-cell) ; for HPUX console keyboard ([(shift iso-lefttab)] . table-backward-cell) ; shift-tab on a microsoft natural keyboard and redhat linux ([(shift tab)] . table-backward-cell) ([backtab] . table-backward-cell) ; for terminals (e.g., xterm) ([return] . *table--cell-newline) - ([(control m)] . *table--cell-newline) - ([(control j)] . *table--cell-newline-and-indent) + ([(control ?m)] . *table--cell-newline) + ([(control ?j)] . *table--cell-newline-and-indent) ([mouse-3] . *table--present-cell-popup-menu) ([(control ?>)] . table-widen-cell) ([(control ?<)] . table-narrow-cell) |