fix a bug with incorrect cursor position

db4
Anton Gorenko 2010-05-23 20:28:44 +06:00
parent bfe6cba08d
commit 19634c8757
1 changed files with 1 additions and 1 deletions

View File

@ -69,7 +69,7 @@ SYMBOL: dpi
: line-offset>x ( layout n -- x ) : line-offset>x ( layout n -- x )
#! n is an index into the UTF8 encoding of the text #! n is an index into the UTF8 encoding of the text
[ drop first-line ] [ swap string>> >utf8-index ] 2bi [ drop first-line ] [ swap string>> >utf8-index ] 2bi
0 0 <int> [ pango_layout_line_index_to_x ] keep f 0 <int> [ pango_layout_line_index_to_x ] keep
*int pango>float ; *int pango>float ;
: x>line-offset ( layout x -- n ) : x>line-offset ( layout x -- n )