rid of (get-selection-or-unit 'block), reduce depending on external lib.