mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-29 07:58:28 +00:00
Code Issues Releases Activity

(auto-composition-mode): Add autoload cookie.

Browse Source 
(global-auto-composition-mode): Likewise.
This commit is contained in:
Kenichi Handa 2006-02-21 10:45:21 +00:00
parent 3770793981
commit 16d58d04aa
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/composite.el
View File

@ -472,6 +472,7 @@ This function is the default value of `auto-composition-function' (which see)."
(make-variable-buffer-local 'auto-composition-function) (make-variable-buffer-local 'auto-composition-function)
;;;###autoload
(define-minor-mode auto-composition-mode (define-minor-mode auto-composition-mode
"Toggle Auto Compostion mode. "Toggle Auto Compostion mode.
With arg, turn Auto Compostion mode off if and only if arg is a non-positive With arg, turn Auto Compostion mode off if and only if arg is a non-positive
@ -535,9 +536,9 @@ Auto Composition mode in all buffers (this is the default)."
(put-text-property start end 'auto-composed nil))))) (put-text-property start end 'auto-composed nil)))))
(defun turn-on-auto-composition-if-enabled () (defun turn-on-auto-composition-if-enabled ()
(or auto-composition-mode (auto-composition-mode 1))
(auto-composition-mode)))
;;;###autoload
(define-global-minor-mode global-auto-composition-mode (define-global-minor-mode global-auto-composition-mode
auto-composition-mode turn-on-auto-composition-if-enabled auto-composition-mode turn-on-auto-composition-if-enabled
:extra-args (dummy) :extra-args (dummy)