Target "other-button" {} { /SelectItemEvent { DefinedTID TID eq currenttime LastSelectionTime sub DoubleClickTime lt and { userdict /LeftBrowser known userdict /RightBrowser known and { TargetPileID LeftBrowser eq {RightBrowser} {LeftBrowser} ifelse } { TargetPileID } ifelse (.pile % ) sprintf callback Ref (.articulate %\n) sprintf callback } { TargetPileID (.pile % ) sprintf callback Ref (.define %\n) sprintf callback Pile /DefinedTID TID put } ifelse /LastSelectionTime currenttime store } def /ItemPath {rr} def }