2902
2893
scm_new_procedure ("emulate-keyboard", (FN) tmg_emulate_keyboard, 1, 0, 0);
2903
2894
scm_new_procedure ("emulate-keyboard-message", (FN) tmg_emulate_keyboard_message, 2, 0, 0);
2904
2895
scm_new_procedure ("complete-try?", (FN) tmg_complete_tryP, 0, 0, 0);
2905
scm_new_procedure ("get-keyboard-modifiers", (FN) tmg_get_keyboard_modifiers, 0, 0, 0);
2906
2896
scm_new_procedure ("go-to-path", (FN) tmg_go_to_path, 1, 0, 0);
2907
2897
scm_new_procedure ("go-left", (FN) tmg_go_left, 0, 0, 0);
2908
2898
scm_new_procedure ("go-right", (FN) tmg_go_right, 0, 0, 0);