[Scsh-checkins] CVS: scx/scheme/xlib xlib-interfaces.scm,1.5,1.6 xlib-packages.scm,1.2,1.3

[David Frese <frese@users.sourceforge.net>]

Update of /cvsroot/scsh/scx/scheme/xlib
In directory usw-pr-cvs1:/tmp/cvs-serv2413

Modified Files:
        xlib-interfaces.scm xlib-packages.scm 
Log Message:
added the key package.


Index: xlib-interfaces.scm
===================================================================
RCS file: /cvsroot/scsh/scx/scheme/xlib/xlib-interfaces.scm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -r1.5 -r1.6
*** xlib-interfaces.scm 2001/08/21 15:15:34     1.5
--- xlib-interfaces.scm 2001/08/22 11:51:35     1.6
***************
*** 382,385 ****
--- 382,397 ----
          ))
  
+ (define-interface xlib-key-interface
+   (export display-min-keycode
+         display-max-keycode
+         display-keysyms-per-keycode
+         string->keysym
+         keysym->string
+         keycode->keysym
+         keysym->keycode
+         lookup-string
+         rebind-keysym
+         refresh-keyboard-mapping))
+ 
  ;; all together
  
***************
*** 401,403 ****
--- 413,416 ----
                      xlib-wm-interface
                      xlib-client-interface
+                     xlib-key-interface
                      ))

Index: xlib-packages.scm
===================================================================
RCS file: /cvsroot/scsh/scx/scheme/xlib/xlib-packages.scm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -r1.2 -r1.3
*** xlib-packages.scm   2001/08/21 15:15:34     1.2
--- xlib-packages.scm   2001/08/22 11:51:35     1.3
***************
*** 118,121 ****
--- 118,127 ----
    (files client))
  
+ (define-structure xlib-key xlib-key-interface
+   (open scheme
+       external-calls
+       xlib-types)
+   (files key))
+ 
  ;; all together
  
***************
*** 137,140 ****
--- 143,147 ----
        xlib-wm
        xlib-client
+       xlib-key
        )
    (optimize auto-integrate))