release 1.10.6

[descalc.git] / 12_bindings.pm

diff --git a/bindings.pm b/12_bindings.pm
similarity index 73%
rename from bindings.pm
rename to 12_bindings.pm
index 374a57ded039288ea2e4a749c37c1d7b7e15a1b4..9ea8a4f7ef18c55e92878ea33266b36d9dc45bd8 100644 (file)
--- a/bindings.pm
+++ b/12_bindings.pm
@@ -1,13 +1,13 @@
 # key bindings for DCT, by Shiar
 
-# 1.08.1 2004-09-27 00:40 - moved from 1.8 main
-# 1.08.2 2004-09-27 00:49 - single key alias to chs: \ (often close to _)
-# 1.09.1 2004-10-11 21:45 - function keys moved to menu.pm
-# 1.09.2      10-12 01:45 - alt+backspace and ^W for (hard) drop
+# 1.08.1 200409270040 - moved from 1.8 main
+#     .2 200409270049 - single key alias to chs: \ (often close to _)
+# 1.09.1 200410112145 - function keys moved to menu.pm
+#     .2 200410120145 - alt+backspace and ^W for (hard) drop
+#     .3 200410142200 - enter sent as chr 10 on non-curses terminals
 
 use strict;
 use warnings;
-use utf8;
 
 %alias = (
        chr 4              => "quit",    # ^D
@@ -25,7 +25,8 @@ use utf8;
        "\033\010"         => "drop",    # alt+backspace
        "\033\177"         => "drop",    # alt+backspace
            "\027"         => "drop",    # ^W
-       chr 13             => "enter",   # enter
+       chr 10             => "enter",   # enter (terminal)
+       chr 13             => "enter",   # enter (curses)
        ' '                => "enter",   # space
        '='                => "sto",     #
 
@@ -43,8 +44,8 @@ use utf8;
 
            "s"            => "sin",
        "\033s"            => "asin",
-           "c"            => "cos", #todo: u? o?
-       "\033c"            => "acos",
+           "o"            => "cos", # or u?
+       "\033o"            => "acos",
            "t"            => "tan",
        "\033t"            => "atan",
            "l"            => "log",
@@ -55,9 +56,13 @@ use utf8;
        "\033q"            => "sqrt",
            "x"            => "^",
        "\033x"            => "xroot",
-       "\033^"            => "xroot",
+       "\033^"            => "xroot",   # for consistency
            "v"            => "inv",
 ); # %alias
 
-1;
+return {
+       author  => "Shiar",
+       title   => "default key bindings",
+       version => "1.9.3",
+};