[Win32forth-cvs] win32forth/src/gdi gdiDC.f,1.7,1.8

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth/src/gdi
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv11161/win32forth/src/gdi

Modified Files:
	gdiDC.f 
Log Message:
gah:Bugfix to use SelectObject: method and not API call

Index: gdiDC.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/gdi/gdiDC.f,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** gdiDC.f	8 Jan 2006 09:28:08 -0000	1.7
--- gdiDC.f	28 Apr 2007 10:09:12 -0000	1.8
***************
*** 98,102 ****
  \ *P \i nObject \d Specifies the type of stock object. This parameter can be one of the following
  \ ** values. (see GetStockObject:)
!         GetStockObject: self SelectObject self ;M
  
  winver win2k >= [IF] \ only w2k or later
--- 98,102 ----
  \ *P \i nObject \d Specifies the type of stock object. This parameter can be one of the following
  \ ** values. (see GetStockObject:)
!         GetStockObject: self SelectObject: self ;M
  
  winver win2k >= [IF] \ only w2k or later