aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2002-10-28 18:29:36 +0000
committerDave Love2002-10-28 18:29:36 +0000
commit2d8a4bbe9c36974ae9881729a806ad426fead247 (patch)
treee67e6e27a67589a827e2deb56c5f3dc0f5f730ba
parentce20e03e00355396a9ef1c8678d2368720c5dc73 (diff)
downloademacs-2d8a4bbe9c36974ae9881729a806ad426fead247.tar.gz
emacs-2d8a4bbe9c36974ae9881729a806ad426fead247.zip
(quail-keyboard-layout): Move after
quail-keyboard-layout-alist.
-rw-r--r--lisp/international/quail.el40
1 files changed, 20 insertions, 20 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el
index 91e0f09abbd..c4fcb1da6c4 100644
--- a/lisp/international/quail.el
+++ b/lisp/international/quail.el
@@ -618,26 +618,6 @@ This layout is almost the same as that of VT100,
618 but the location of key \\ (backslash) is just right of key ' (single-quote), 618 but the location of key \\ (backslash) is just right of key ' (single-quote),
619 not right of RETURN key.") 619 not right of RETURN key.")
620 620
621(defcustom quail-keyboard-layout quail-keyboard-layout-standard
622 "A string which represents physical key layout of a particular keyboard.
623We assume there are six rows and each row has 15 keys (columns),
624 the first row is above the `1' - `0' row,
625 the first column of the second row is left of key `1',
626 the first column of the third row is left of key `q',
627 the first column of the fourth row is left of key `a',
628 the first column of the fifth row is left of key `z',
629 the sixth row is below the `z' - `/' row.
630Nth (N is even) and (N+1)th characters in the string are non-shifted
631and shifted characters respectively at the same location.
632The location of Nth character is row (N / 30) and column ((N mod 30) / 2).
633The command `quail-set-keyboard-layout' usually sets this variable."
634 :group 'quail
635 :type `(choice
636 ,@(mapcar (lambda (pair)
637 (list 'const :tag (car pair) (cdr pair)))
638 quail-keyboard-layout-alist)
639 (string :tag "Other")))
640
641(defconst quail-keyboard-layout-len 180) 621(defconst quail-keyboard-layout-len 180)
642 622
643;; Here we provide several examples of famous keyboard layouts. 623;; Here we provide several examples of famous keyboard layouts.
@@ -687,6 +667,26 @@ The command `quail-set-keyboard-layout' usually sets this variable."
687See the documentation of `quail-keyboard-layout' for the format of 667See the documentation of `quail-keyboard-layout' for the format of
688the layout string.") 668the layout string.")
689 669
670(defcustom quail-keyboard-layout quail-keyboard-layout-standard
671 "A string which represents physical key layout of a particular keyboard.
672We assume there are six rows and each row has 15 keys (columns),
673 the first row is above the `1' - `0' row,
674 the first column of the second row is left of key `1',
675 the first column of the third row is left of key `q',
676 the first column of the fourth row is left of key `a',
677 the first column of the fifth row is left of key `z',
678 the sixth row is below the `z' - `/' row.
679Nth (N is even) and (N+1)th characters in the string are non-shifted
680and shifted characters respectively at the same location.
681The location of Nth character is row (N / 30) and column ((N mod 30) / 2).
682The command `quail-set-keyboard-layout' usually sets this variable."
683 :group 'quail
684 :type `(choice
685 ,@(mapcar (lambda (pair)
686 (list 'const :tag (car pair) (cdr pair)))
687 quail-keyboard-layout-alist)
688 (string :tag "Other")))
689
690;; A non-standard keyboard layout may miss some key locations of the 690;; A non-standard keyboard layout may miss some key locations of the
691;; standard layout while having additional key locations not in the 691;; standard layout while having additional key locations not in the
692;; standard layout. This alist maps those additional key locations to 692;; standard layout. This alist maps those additional key locations to