;;; -*- lexical-binding: t -*- ;; ;; this file: ;; https://dataswamp.org/~incal/emacs-init/signal.el ;; ;; test from Emacs: ;; (signal-process (emacs-pid) 'sigusr1) ;; ;; test from zsh: ;; $ kill -s usr1 $(pidof emacs) (defun signal-usr1-f () (interactive) (message "USR1 signal") ) (define-key special-event-map [sigusr1] #'signal-usr1-f) (provide 'signal)