--- tmore.rb.orig Fri Feb 8 18:33:41 2002 +++ tmore.rb Fri Feb 8 18:41:50 2002 @@ -247,15 +247,15 @@ def keyinput m = 0 case getch - when ?q # Ctrl-Cの出すコードって何？教えてプリーズ + when ?q, ?\C-c # Ctrl-Cの出すコードって何？教えてプリーズ return nil - when ?\n, ?j + when ?\n, ?j, ?\C-n m = 1 - when ?\s + when ?\s, ?\C-f m = 2 * $zw / 3 - when ?\b + when ?\b, ?\C-b, ?b m = -2 * $zw / 3 - when ?k + when ?k, ?\C-p m = -1 when ?G m = 1000000 # とりあえず
