Update of /cvsroot/win32forth/win32forth/src/lib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv16941/src/lib
Modified Files:
ScintillaHyperEdit.f
Log Message:
Smal bugfix in the Hyper>: method.
Index: ScintillaHyperEdit.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/lib/ScintillaHyperEdit.f,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** ScintillaHyperEdit.f 21 Dec 2004 00:19:10 -0000 1.1
--- ScintillaHyperEdit.f 21 Jan 2006 09:05:22 -0000 1.2
***************
*** 134,138 ****
:M Hyper>: { \ SelBuf$ -- } \ Hyperlink to selected word
! 2048 LocalAlloc: SelBuf$
SelBuf$ GetSelText: self
if SelBuf$ HyperWord
--- 134,138 ----
:M Hyper>: { \ SelBuf$ -- } \ Hyperlink to selected word
! 0 GetSelText: self LocalAlloc: SelBuf$
SelBuf$ GetSelText: self
if SelBuf$ HyperWord
***************
*** 168,170 ****
MODULE
- |
