let intruderFrameForButton = (Frame.create ~width:20 ~borderwidth:0 infoFrame : Widget.frame Widget.widget)