rebol - 检测 Rebol 中的右键单击

Question

view layout [
  box red feel [
    engage: func [face action event] [
      if action = 'alt-down [print "alt down"] ; 1
      if event/double-click [print "double-click"] ; 2
    ]
  ]
]

此代码不检测双击右键。
当我快速双击右键时，它只会检测到 1 次单击（第 1 行）。
我试过检测双击，但它不适用于鼠标右键（第 2 行）。

有没有办法检测连续的鼠标右键点击？