chiark / gitweb /
Default cursor is LH one
authorIan Jackson <ian@liberator.relativity.greenend.org.uk>
Sat, 4 Jul 2009 19:54:56 +0000 (20:54 +0100)
committerIan Jackson <ian@liberator.relativity.greenend.org.uk>
Sat, 4 Jul 2009 19:54:56 +0000 (20:54 +0100)
pctb/dictionary-manager

index 24e1aa28d306ed74bad41b7406998deca965427b..c1e983b6b35e7c65d2ea9223f4413b5c52936b22 100755 (executable)
@@ -731,7 +731,7 @@ proc startup_cursor {} {
     global glyphsdone unk_l unk_r
     
     set cur_already [expr {[llength $glyphsdone]/5-1}]
     global glyphsdone unk_l unk_r
     
     set cur_already [expr {[llength $glyphsdone]/5-1}]
-    set cur_mode 1 ;# one of:   0 1 already text
+    set cur_mode 0 ;# one of:   0 1 already text
 
     set cur_0 $unk_l
     set cur_1 [expr {$unk_r+1}]
 
     set cur_0 $unk_l
     set cur_1 [expr {$unk_r+1}]