midizap-mode: Add keysyms to auto-complete keywords table.
This commit is contained in:
parent
e53e3b3140
commit
8c622bd085
10
Makefile
10
Makefile
|
@ -18,7 +18,7 @@ INSTALL_TARGETS = midizap $(wildcard midizap.1)
|
|||
|
||||
.PHONY: all world install uninstall man pdf clean realclean
|
||||
|
||||
all: midizap
|
||||
all: midizap midizap-mode.el
|
||||
|
||||
# This also creates the manual page (see below).
|
||||
world: all man
|
||||
|
@ -56,7 +56,7 @@ midizap.pdf: midizap.1
|
|||
man -Tpdf ./midizap.1 > $@
|
||||
|
||||
clean:
|
||||
rm -f midizap keys.h $(OBJ)
|
||||
rm -f midizap keys.h keys.el midizap-mode.el $(OBJ)
|
||||
|
||||
realclean:
|
||||
rm -f midizap midizap.1 midizap.pdf keys.h $(OBJ)
|
||||
|
@ -64,6 +64,12 @@ realclean:
|
|||
keys.h: keys.sed /usr/include/X11/keysymdef.h
|
||||
sed -f keys.sed < /usr/include/X11/keysymdef.h > keys.h
|
||||
|
||||
keys.el: keywords.sed /usr/include/X11/keysymdef.h
|
||||
sed -f keywords.sed < /usr/include/X11/keysymdef.h | tr '\n' ' ' > keys.el
|
||||
|
||||
midizap-mode.el: midizap-mode.el.in keys.el
|
||||
sed '/;; keysyms/r keys.el' < midizap-mode.el.in > midizap-mode.el
|
||||
|
||||
readconfig.o: midizap.h keys.h
|
||||
midizap.o: midizap.h jackdriver.h
|
||||
jackdriver.o: jackdriver.h
|
||||
|
|
|
@ -0,0 +1,3 @@
|
|||
/^\#define/!d
|
||||
s/^\#define //
|
||||
s/^\([^[:space:]]*\).*$/"\1"/
|
|
@ -27,7 +27,8 @@
|
|||
(require 'comint)
|
||||
|
||||
(defconst midizap-keywords
|
||||
(list
|
||||
(append
|
||||
(list
|
||||
"DEBUG_REGEX" "DEBUG_STROKES" "DEBUG_KEYS" "DEBUG_MIDI"
|
||||
"MIDI_OCTAVE" "JACK_NAME" "JACK_PORTS"
|
||||
"JACK_IN" "JACK_IN1" "JACK_IN2"
|
||||
|
@ -35,7 +36,11 @@
|
|||
"PASSTHROUGH" "SYSTEM_PASSTHROUGH"
|
||||
"RELEASE" "SHIFT" "SHIFT1" "SHIFT2" "SHIFT3" "SHIFT4"
|
||||
"CLASS" "TITLE"
|
||||
))
|
||||
)
|
||||
(list
|
||||
;; keysyms
|
||||
|
||||
)))
|
||||
|
||||
;;;###autoload
|
||||
(define-generic-mode 'midizap-mode
|
Loading…
Reference in New Issue