From 7ad0170ccf29c2abbe60247c90b8db6440752344 Mon Sep 17 00:00:00 2001
From: frese <frese>
Date: Mon, 15 Mar 2004 19:30:01 +0000
Subject: [PATCH] - fixed create-window in it's extraction of the window-class
 argument

---
 c/xlib/window.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/c/xlib/window.c b/c/xlib/window.c
index 1f315ff..9cecb92 100644
--- a/c/xlib/window.c
+++ b/c/xlib/window.c
@@ -74,7 +74,7 @@ s48_value scx_Create_Window (s48_value display, s48_value parent,
 		      (int)s48_extract_integer(height), 
 		      (int)s48_extract_integer(border_width),
 		      s48_extract_integer(depth),
-		      s48_extract_integer(class),
+		      scx_extract_window_class(class),
 		      scx_extract_visual(visual), mask, &Xattrs);
   S48_GC_RETURN(scx_enter_window(win));
 }