aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaniel Bergey2012-08-17 00:28:23 -0700
committerGlenn Morris2012-08-17 00:28:23 -0700
commit0df648f9869d11681df46502f7eef2bee1c7ae39 (patch)
tree02a86509f4d37c39658bb9375b667fc8ae1361d0
parenta09710e913297f40c320c93689391a0a8fe4bc3a (diff)
downloademacs-0df648f9869d11681df46502f7eef2bee1c7ae39.tar.gz
emacs-0df648f9869d11681df46502f7eef2bee1c7ae39.zip
quail-define-inscript-package tiny change
* leim/quail/indian.el (quail-define-inscript-package): Set kbd-translate for all Inscript layouts. It's a positional layout: vowels should be on the left hand regardless of the underlying characters produced by those keys. Fixes: debbugs:12072
-rw-r--r--leim/ChangeLog7
-rw-r--r--leim/quail/indian.el2
2 files changed, 8 insertions, 1 deletions
diff --git a/leim/ChangeLog b/leim/ChangeLog
index fcf0e72c3f4..5c29052d98b 100644
--- a/leim/ChangeLog
+++ b/leim/ChangeLog
@@ -1,3 +1,10 @@
12012-08-17 Daniel Bergey <bergey@alum.mit.edu> (tiny change)
2
3 * quail/indian.el (quail-define-inscript-package):
4 Set kbd-translate for all Inscript layouts. It's a positional
5 layout: vowels should be on the left hand regardless of the
6 underlying characters produced by those keys. (Bug#12072)
7
12012-08-06 Mohsen BANAN <libre@mohsen.1.banan.byname.net> 82012-08-06 Mohsen BANAN <libre@mohsen.1.banan.byname.net>
2 9
3 * quail/persian.el: Add some mappings. (Bug#11812) 10 * quail/persian.el: Add some mappings. (Bug#11812)
diff --git a/leim/quail/indian.el b/leim/quail/indian.el
index 1c01693478b..2541e60c57d 100644
--- a/leim/quail/indian.el
+++ b/leim/quail/indian.el
@@ -309,7 +309,7 @@ Full key sequences are listed below:")
309(defun quail-define-inscript-package (char-tables key-tables pkgname lang 309(defun quail-define-inscript-package (char-tables key-tables pkgname lang
310 title docstring) 310 title docstring)
311 (funcall 'quail-define-package pkgname lang title nil docstring 311 (funcall 'quail-define-package pkgname lang title nil docstring
312 nil nil nil nil nil nil nil nil) 312 nil nil nil t nil nil nil nil)
313 (let (char-table key-table char key) 313 (let (char-table key-table char key)
314 (while (and char-tables key-tables) 314 (while (and char-tables key-tables)
315 (setq char-table (car char-tables) 315 (setq char-table (car char-tables)