xbindkeys-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Xbindkeys-devel] [PATCH 1/2] Remove reference to guile's old GH interfa


From: Hans-Peter Deifel
Subject: [Xbindkeys-devel] [PATCH 1/2] Remove reference to guile's old GH interface
Date: Wed, 9 Mar 2011 16:10:43 +0100

The GH interface has been removed in guile-2.0.
---
 options.c |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/options.c b/options.c
index 20c4714..5b0c2ac 100644
--- a/options.c
+++ b/options.c
@@ -28,7 +28,6 @@
 
 #ifdef GUILE_FLAG
 #include <libguile.h>
-#include <guile/gh.h>
 #endif
 
 char *display_name = NULL;
@@ -1051,7 +1050,7 @@ SCM xbindkey_function_wrapper (SCM key, SCM fun)
       return SCM_BOOL_F;
     }
   else {
-    printf ("add_key ok!!!  fun=%d\n", gh_procedure_p (fun));
+    printf ("add_key ok!!!  fun=%d\n", (scm_procedure_p (fun) == SCM_BOOL_T));
   }
 
   //scm_permanent_object (tab_scm[0]);
-- 
1.7.3.4




reply via email to

[Prev in Thread] Current Thread [Next in Thread]