| … | |
… | |
| 150 | { |
150 | { |
| 151 | if (strncmp (str, "command:", 8) == 0) |
151 | if (strncmp (str, "command:", 8) == 0) |
| 152 | term->cmdbuf_append (str + 8, strlen (str) - 8); |
152 | term->cmdbuf_append (str + 8, strlen (str) - 8); |
| 153 | else if (strncmp (str, "string:", 7) == 0) |
153 | else if (strncmp (str, "string:", 7) == 0) |
| 154 | term->tt_write_user_input (colon + 1, strlen (colon + 1)); |
154 | term->tt_write_user_input (colon + 1, strlen (colon + 1)); |
| 155 | else if (strncmp (str, "perl:", 8) == 0) |
155 | else if (strncmp (str, "perl:", 5) == 0) |
| 156 | HOOK_INVOKE ((term, HOOK_USER_COMMAND, DT_STR, colon + 1, DT_END)); |
156 | HOOK_INVOKE ((term, HOOK_USER_COMMAND, DT_STR, colon + 1, DT_END)); |
| 157 | else |
157 | else |
| 158 | HOOK_INVOKE ((term, HOOK_KEYBOARD_DISPATCH, DT_STR_LEN, str, colon - str, DT_STR, colon + 1, DT_END)); |
158 | HOOK_INVOKE ((term, HOOK_KEYBOARD_DISPATCH, DT_STR_LEN, str, colon - str, DT_STR, colon + 1, DT_END)); |
| 159 | } |
159 | } |
| 160 | else |
160 | else |
