method
unselect_dir dir =
selection <-
None
;
behav
#
unselect dir