[linux-l] perl CPAN

[Philipp Grau]

Hallo Olaf,

* Olaf Radicke <olaf_rad at gmx.de> [06.02.02 11:50]:
>  if ($letzter_zeilenfokus == 31){
>       $t->icursor("test",1); # An dieser Stelle soll der Cursor
>                              # eine neue Position bekommen 

Ich spreche nicht wirklich gut Perl aber ich befürchte hier ist was falsch:

Aus Perl in a Nutshell:
----------8<--------snipp---------8<-------------------------
Places the cursor at the specified index. For example, to move the cursor to
the very end of the entry string: 

         $entry->icursor('end');
	 
----------8<--------snipp---------8<-------------------------

So dass ich denke Dein icursor Aufruf ist nicht OK.

Und Index wird in folgender weise beschrieben:

----------8<--------snipp---------8<-------------------------

In an Entry widget, several indexes are defined to identify positions in the
entry text, for use by the methods used for retrieving or manipulating entry
text. These indexes are:

n

     An integer representing a character position, with 0 as the first character in the string.

insert

     The character directly after the insert cursor.

sel.first

     The first character in the selection block.

sel.last

     The character after the last character in the selection block.

anchor

     The anchored position.

end

     The position just after the last character in the entry string.

@x

     The character containing the specified x coordinate.

----------8<--------snipp---------8<-------------------------


\bye
Philipp