diff options
| author | Eli Zaretskii | 2001-09-05 12:01:51 +0000 |
|---|---|---|
| committer | Eli Zaretskii | 2001-09-05 12:01:51 +0000 |
| commit | 3573bdbe0fe147105743f734dfdbca69f1464486 (patch) | |
| tree | 23256166a2734608a668092b166b336551b25338 | |
| parent | ff43a665609bef8f32ddac7c3505b45c73c2a8ad (diff) | |
| download | emacs-3573bdbe0fe147105743f734dfdbca69f1464486.tar.gz emacs-3573bdbe0fe147105743f734dfdbca69f1464486.zip | |
(quail-use-package, quail-inactivate)
(quail-activate): Mention the hooks these functions run in their
doc strings.
| -rw-r--r-- | lisp/international/quail.el | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lisp/international/quail.el b/lisp/international/quail.el index 9a68304288a..7872d22e839 100644 --- a/lisp/international/quail.el +++ b/lisp/international/quail.el | |||
| @@ -221,7 +221,10 @@ Conversion keymap is a keymap used while conversion region is active | |||
| 221 | ;;;###autoload | 221 | ;;;###autoload |
| 222 | (defun quail-use-package (package-name &rest libraries) | 222 | (defun quail-use-package (package-name &rest libraries) |
| 223 | "Start using Quail package PACKAGE-NAME. | 223 | "Start using Quail package PACKAGE-NAME. |
| 224 | The remaining arguments are libraries to be loaded before using the package." | 224 | The remaining arguments are libraries to be loaded before using the package. |
| 225 | |||
| 226 | This activates input method defined by PACKAGE-NAME by running | ||
| 227 | `quail-activate', which see." | ||
| 225 | (let ((package (quail-package package-name))) | 228 | (let ((package (quail-package package-name))) |
| 226 | (if (null package) | 229 | (if (null package) |
| 227 | ;; Perhaps we have not yet loaded necessary libraries. | 230 | ;; Perhaps we have not yet loaded necessary libraries. |
| @@ -529,7 +532,9 @@ non-Quail commands." | |||
| 529 | (kill-buffer quail-guidance-buf))) | 532 | (kill-buffer quail-guidance-buf))) |
| 530 | 533 | ||
| 531 | (defun quail-inactivate () | 534 | (defun quail-inactivate () |
| 532 | "Inactivate Quail input method." | 535 | "Inactivate Quail input method. |
| 536 | |||
| 537 | This function runs the normal hook `quail-inactivate-hook'." | ||
| 533 | (interactive) | 538 | (interactive) |
| 534 | (quail-activate -1)) | 539 | (quail-activate -1)) |
| 535 | 540 | ||
| @@ -537,6 +542,9 @@ non-Quail commands." | |||
| 537 | "Activate Quail input method. | 542 | "Activate Quail input method. |
| 538 | With arg, activate Quail input method if and only if arg is positive. | 543 | With arg, activate Quail input method if and only if arg is positive. |
| 539 | 544 | ||
| 545 | This function runs `quail-activate-hook' if it activates the input | ||
| 546 | method, `quail-inactivate-hook' if it deactivates it. | ||
| 547 | |||
| 540 | While this input method is active, the variable | 548 | While this input method is active, the variable |
| 541 | `input-method-function' is bound to the function `quail-input-method'." | 549 | `input-method-function' is bound to the function `quail-input-method'." |
| 542 | (if (and arg | 550 | (if (and arg |