How can I set :xscrollcommand configure option to a lisp function?