[Top][All Lists]
[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:05:42 +0100 |
User-agent: |
Mutt/1.5.21 (2010-09-15) |
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