;;; -*- lexical-binding: t -*- (require 'cl-lib) (cl-pushnew "." load-path :test #'string=) (require 'luki-lisp) (-> 'gnus-group) (-> 'gnus-util) (defun kill-emacs-hook-f () (when (gnus-alive-p) (gnus-group-exit))) (add-hook 'kill-emacs-hook #'kill-emacs-hook-f) (<- 'll-quit)