audio/glame/files/patch-src_glmid_glconfig.c


1
2
3
4
5
6
7
8
9
10
11
12

--- src/glmid/glconfig.c.orig	2004-10-23 13:09:23 UTC
+++ src/glmid/glconfig.c
@@ -125,7 +125,8 @@ int glame_config_get_long(const char *ke
 	snprintf(cmd, 255, "(glame-config-get '%s)", key);
 	/* FIXME: execute with catch. */
 	s_res = glame_gh_safe_eval_str(cmd);
-	if (!gh_exact_p(s_res))
+	if (!gh_number_p(s_res)
+	    || !gh_exact_p(s_res))
 		return -1;
 	*value = glame_scm2long(s_res);
 	return 0;