Skip to content

Instantly share code, notes, and snippets.

@gongo
Created October 5, 2016 12:48
Show Gist options
  • Save gongo/89a05b152fc75fceb14aa38890e0d3c8 to your computer and use it in GitHub Desktop.
Save gongo/89a05b152fc75fceb14aa38890e0d3c8 to your computer and use it in GitHub Desktop.
Emacs を終了したら LINE に通知が行くやつ
(require 'request)
(defconst line-notify--endpoint
"https://notify-api.line.me/api/notify")
(setq line-notify-token "XXXXXXXXXX")
(defun line-notify-sync (message)
(request
line-notify--endpoint
:type "POST"
:sync t
:data `(("message" . ,message))
:headers `(("Authorization" . ,(concat "Bearer " line-notify-token)))))
(add-hook 'kill-emacs-hook
(lambda nil
(line-notify-sync (concat "died at "
(format-time-string "%Y/%m/%d %r")))))
@gongo
Copy link
Author

gongo commented Oct 6, 2016

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment