Rebol shift-tab побочные эффекты

Question

Учитывая это: просмотр макета [ field [print "1" ] field [print "2"] ]

Когда я перемещаю + вкладку из поля № 2 в поле № 1, никакие действия не запускаются. Как мне заставить их стрелять как обычную вкладку?

Answer 1

Это ошибка в обработчике ключей для field стиль в движке Rebol/View. Вот быстрый патч, который вы можете включить в свой код, чтобы исправить его и заставить работать SHIFT+Tab:

use [body f pos][
    ;-- patch `ctx-text/back-field` function to fix the bug
    body: copy/deep second f: get in ctx-text 'back-field
    insert body/2/while [if head? item [item: tail item]]
    ctx-text/back-field: func first :f :body

    ;-- remove test that disables face/action for back-tabs
    body: second get in ctx-text 'edit-text
    body: find body 'word?
    pos: at body/3/7/tab-char/5/6 11
    change/part pos pos/4 4
]

Этот код будет проходить через функции движка View во время выполнения (код - это данные в Rebol) и исправлять тела функций, вводя или удаляя код там, где это необходимо.

Если вы являетесь пользователем Rebol/SDK, я могу дать вам инструкции по непосредственному исправлению исходных файлов, чтобы вы могли заключить фиксированный исполняемый файл View.

Наслаждаться.