scsh-conservatory
/
scx
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed Event_Mask_Syms/Event_Syms confusion.

This commit is contained in:
frese 2001-07-16 11:55:03 +00:00
parent 2a471242a5
commit bb12a98fa8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
c/xlib/event.c
View File

@ -1,7 +1,7 @@
#include "xlib.h" #include "xlib.h"
#include "scheme48.h" #include "scheme48.h"
SYMDESCR Event_Names[] = { SYMDESCR Event_Syms[] = {
{ "key-press", KeyPress }, { "key-press", KeyPress },
{ "key-release", KeyRelease }, { "key-release", KeyRelease },
{ "button-press", ButtonPress }, { "button-press", ButtonPress },
@ -339,7 +339,7 @@ s48_value enter_event(XEvent* e) {
// more?? // more??
// And the Event-Name // And the Event-Name
r = s48_cons( Bit_To_Symbol(e->type, Event_Names), r ); r = s48_cons( Bit_To_Symbol(e->type, Event_Syms), r );
S48_GC_UNPROTECT(); S48_GC_UNPROTECT();
return r; return r;