;;; -*- lexical-binding: t -*- ;; ;; this file: ;; https://dataswamp.org/~incal/emacs-init/button-incal.el (require 'cl-lib) (cl-pushnew "." load-path :test #'string=) (require 'll) (ignore 1) ;; (defun insert-button (label fun &rest args) ;; (insert-text-button (@f "[%s]" label) 'face "button" 'action (L (_) (apply fun args)))) (provide 'll-buttons) ;;; buttons.el ends here