Fix kanji-coversion key binding. This has been broken since 7.1
authorTatsuo Ishii <[email protected]>
Mon, 18 Feb 2002 04:12:34 +0000 (04:12 +0000)
committerTatsuo Ishii <[email protected]>
Mon, 18 Feb 2002 04:12:34 +0000 (04:12 +0000)
Per Yoshinori Ariie's report.

src/bin/pgaccess/lib/tables.tcl

index 90ace828f4f8c75c7153deb40c8147b82e9c0e2c..b8afb7d2a2faaf6a0ee56b0ad7a3da5ae290d0c5 100644 (file)
@@ -815,7 +815,7 @@ if {$PgAcVar(mw,$wn,updatable)} then {
        $wn.c bind q <Key> "Tables::editText $wn %A %K"
        if {[info commands kanjiInput] == "kanjiInput"} then {
                $wn.c bind q <Control-backslash> "pgaccess_kinput_start %W";
-               $wn.c bind q <Control-Kanji> "pg_access_kinput_start %W";
+               $wn.c bind q <Control-Kanji> "pgaccess_kinput_start %W";
        }
 } else {
        $wn.c bind q <Key> {}