Mercurial > emacs
view lisp/Makefile @ 22833:a3fe2af7cefb
(Qinput_method_function): New variable.
(syms_of_keyboard): Init and staticpro it.
(read_key_sequence): Bind input-method-function,
and set it to nil after reading the first event.
(raw_keybuf, raw_keybuf_count): New variables, to record
raw input events as they are read with read_char.
(GROW_RAW_KEYBUF): New macro.
(Fthis_single_command_raw_keys): New function.
(syms_of_keyboard): defsubr it.
(read_char): Call the input method if appropriate.
Change logic for distinguishing rereads from new events;
use local var `reread'. Take events from
Vunread_input_method_events and Vunread_post_input_method_events.
(Vunread_input_method_events, Vunread_post_input_method_events)
(Vinput_method_function): New variable.
(syms_of_keyboard): Set up Lisp vars.
(command_loop_1): Check Vunread_input_method_events and
Vunread_post_input_method_events along with Vunread_command_events.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 26 Jul 1998 23:03:58 +0000 |
parents | e37aa6f8f583 |
children | f882430c706b |
line wrap: on
line source
# # Maintenance productions for the Lisp directory # EMACS = emacs SOURCES = *.el COPYING Makefile lisptagsfiles1 = [a-zA-Z]*.el lisptagsfiles2 = [a-zA-Z]*/[a-zA-Z]*.el ETAGS = ../lib-src/etags dontcompilefiles: bindings.el blessmail.el bruce.el cus-load.el cus-start.el dontcompilefiles: forms-d2.el forms-pass.el dontcompilefiles: latin-1.el latin-2.el latin-3.el latin-4.el latin-5.el dontcompilefiles: loaddefs.el loadup.el mule-conf.el patcomp.el dontcompilefiles: paths.el sc.el subdirs.el term-nasty.el version.el doit: custom-deps: doit subdirs=`find . -type d -print`; \ for file in $$subdirs; do \ case $$file in */Old | */RCS | */=* ) ;; \ *) wins="$$wins $$file" ;; \ esac; \ done; \ echo Directories: $$wins; \ $(EMACS) -batch -l cus-dep -f custom-make-dependencies $$wins finder-data: doit subdirs=`find . -type d -print`; \ for file in $$subdirs; do \ case $$file in */Old | */RCS | */=* ) ;; \ *) wins="$$wins $$file" ;; \ esac; \ done; \ echo Directories: $$wins; \ $(EMACS) -batch -l finder -f finder-compile-keywords-make-dist $$wins autoloads: doit subdirs=`find . -type d -print`; \ for file in $$subdirs; do \ case $$file in */Old | */RCS | */=* ) ;; \ *) wins="$$wins $$file" ;; \ esac; \ done; \ echo Directories: $$wins; \ $(EMACS) -batch -f batch-update-autoloads $$wins update-subdirs: doit subdirs=`find . -type d -print`; \ for file in $$subdirs; do \ case $$file in */Old | */RCS | */=* ) ;; \ *) wins="$$wins $$file" ;; \ esac; \ done; \ for file in $$wins; do \ ../update-subdirs $$file; \ done; updates: doit subdirs=`find . -type d -print`; \ for file in $$subdirs; do \ case $$file in */Old | */RCS | */=* ) ;; \ *) wins="$$wins $$file" ;; \ esac; \ done; \ for file in $$wins; do \ ../update-subdirs $$file; \ done; \ echo Directories: $$wins; \ $(EMACS) -batch -l cus-dep -f custom-make-dependencies $$wins; \ $(EMACS) -batch -l finder -f finder-compile-keywords-make-dist $$wins; \ $(EMACS) -batch -f batch-update-autoloads $$wins TAGS: $(lisptagsfiles1) $(lisptagsfiles2) ${ETAGS} $(lisptagsfiles1) $(lisptagsfiles2) TAGS-LISP: $(lispsource)$(lisptagsfiles1) $(lispsource)$(lisptagsfiles2) ${ETAGS} -o TAGS-LISP \ $(lispsource)$(lisptagsfiles1) $(lispsource)$(lisptagsfiles2)