Commit 1ff93753ab4a278bfe780808c1ef843cf1d00f3e to why's shoes

why / shoes

Description:	a tiny graphical app kit for ruby
Homepage:	http://code.whytheluckystiff.net/shoes
Clone URL:	git://github.com/why/shoes.git Give this clone URL to anyone. `git clone git://github.com/why/shoes.git`

 * shoes/native/windows.c: filter out dups in the font list on windows.

why (author)

Mon Oct 06 09:27:32 -0700 2008

commit 1ff93753ab4a278bfe780808c1ef843cf1d00f3e
tree de33729b59dcf0fd32d128ed35e4fbec1fadffc5
parent 4d450e1ee1e9a6e27742b033d29b9527967c2ff8

shoes/native/windows.c

shoes/native/windows.c

0
@@ -86,7 +86,9 @@ shoes_font_list()
0
   font.lfCharSet = DEFAULT_CHARSET;
0
   EnumFontFamiliesEx(dc, &font, shoes_font_list_iter, (LPARAM)ary, 0);
0
   ReleaseDC(shoes_world->os.hidden, dc);
0
-  return rb_funcall(ary, rb_intern("sort"), 0);
0
+  rb_funcall(ary, rb_intern("uniq!"), 0);
0
+  rb_funcall(ary, rb_intern("sort!"), 0);
0
+  return ary;
0
 }
0
 
0
 void shoes_native_init()

Comments

No one has commented yet.