;;; -*- 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") )

(keymap-set special-event-map "<sigusr1>" #'signal-usr1-f)

(provide 'signal)