diff options
Diffstat (limited to 'wm.scm')
| -rw-r--r-- | wm.scm | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -2,6 +2,7 @@ #:use-module (system foreign) #:export (wm-init wm-set-configure-notify-handler! + wm-run wm-quit)) (define libschewm (dynamic-link "libschewm")) @@ -24,6 +25,9 @@ (define wm-quit (schewm-func void "wm_quit" '())) +(define wm-run + (schewm-func void "wm_run" '())) + (define c/wm-set-configure-notify-handler (schewm-func void "wm_set_configure_notify_handler" @@ -35,5 +39,3 @@ handler (list int16 int16 uint32 uint32)))) -(define (wm-set-keybind mod keysym handler) - ) |