* flatline.el: fix flatline:shorten-path