feat: add keyboard action

This commit is contained in:
lin onetwo 2024-03-21 21:30:08 +08:00
parent 73d2ee7a41
commit 411887d121
1 changed files with 9 additions and 2 deletions

View File

@ -13,10 +13,17 @@ caption: {{$:/language/ControlPanel/LayoutSwitcher/Caption}}
</div>
\end
\procedure input-next-actions(step:1)
\function layouts() [filter<layouts-filter>]
<$log layouts=<<layouts>> aaa="aaa" />
<$action-sendmessage $message="tm-navigate" $param={{{[<layouts>cycle<layouts>,<step>]}}}/>
\end
\whitespace trim
<$linkcatcher to="$:/layout">
<$keyboard key="((input-up))" actions=<<input-next-actions "before" "reverse[]">>>
<$keyboard key="((input-down))" actions=<<input-next-actions>>>
<$keyboard key="((input-up))" actions=<<input-next-actions>>>
<$keyboard key="((input-down))" actions=<<input-next-actions "-1">>>
<div class="tc-chooser">
<$list filter=<<layouts-filter>>>
<% if [{$:/layout}has[text]] %>