X-Git-Url: http://git.hcoop.net/bpt/emacs.git/blobdiff_plain/e97d3ec0184763b2479224486e70d23f03bd340f..e4920bc99dfcee02c3bb83b46a761b0893f76626:/leim/quail/tibetan.el diff --git a/leim/quail/tibetan.el b/leim/quail/tibetan.el index e2fd156766..ba47155524 100644 --- a/leim/quail/tibetan.el +++ b/leim/quail/tibetan.el @@ -1,9 +1,8 @@ ;;; tibetan.el --- Quail package for inputting Tibetan characters -*-coding: iso-2022-7bit;-*- -;; Copyright (C) 1997, 2001, 2002, 2003, 2004, 2005, 2006, 2007 -;; Free Software Foundation, Inc. +;; Copyright (C) 1997, 2001-2011 Free Software Foundation, Inc. ;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, -;; 2006, 2007 +;; 2006, 2007, 2008, 2009, 2010, 2011 ;; National Institute of Advanced Industrial Science and Technology (AIST) ;; Registration Number H14PRO021 @@ -11,10 +10,10 @@ ;; This file is part of GNU Emacs. -;; GNU Emacs is free software; you can redistribute it and/or modify +;; GNU Emacs is free software: you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 3, or (at your option) -;; any later version. +;; the Free Software Foundation, either version 3 of the License, or +;; (at your option) any later version. ;; GNU Emacs is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of @@ -22,16 +21,14 @@ ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License -;; along with GNU Emacs; see the file COPYING. If not, write to -;; the Free Software Foundation, 51 Franklin Street, Fifth Floor, -;; Boston, MA 02110-1301, USA. +;; along with GNU Emacs. If not, see . ;; Author: Toru TOMABECHI, ;; Created: Feb. 17. 1997 ;; History: -;; 1997.03.13 Support for inputting special signs and punctuations added. +;; 1997.03.13 Support for inputting special signs and punctuation added. ;; (Only Ext. Wylie input) ;;; Commentary: @@ -59,7 +56,7 @@ (if (string-match "^-[dy]" quail-current-key) (setq quail-current-key (substring quail-current-key 1))) (let ((str (tibetan-transcription-to-tibetan quail-current-key))) - ;; If quail-current-key is for punctuations, it can't be + ;; If quail-current-key is for punctuation, it can't be ;; transcribed by tibetan-transcription-to-tibetan, thus STR ;; contains ASCII string now. In that case, use the current ;; characters set in quail-current-str. @@ -83,7 +80,7 @@ '(("-d" . "$(7"2(B") ("-y" . "$(7"B(B"))) -;; Punctuations are not transcribed. +;; Punctuation characters are not transcribed. (defconst tibetan-wylie-punctuation-alist '(("." . " ") @@ -340,7 +337,7 @@ ("(" . "$(7!l(B") ("0" . "$(7!P(B") (")" . "$(7!m(B") -;;; ("-" ) ; enphatic, not yet supported +;;; ("-" ) ; emphatic, not yet supported ;;; ("_" ) ; id. ;;; ("=" ) ; special sign, not yet supported ("+" . "$(7!A(B") @@ -430,7 +427,7 @@ 1. Vowel 'a' should be typed explicitly by the key 'A'. This is really inconvenient. But to make the coding - scheme clear, it is desirable to have an explicite + scheme clear, it is desirable to have an explicit vowel sign for 'a'. 2. Tsheg is assigned to SPC key. You can input a space by typing '>'. @@ -455,5 +452,4 @@ (tibetan-vowel-tibkey-alist . m-state)) (m-state tibetan-modifier-tibkey-alist)))) -;;; arch-tag: 828fdb1a-733f-4c7b-b882-a19d2449ac99 ;;; tibetan.el ends here