init.el 2.4 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576
  1. (org-babel-do-load-languages
  2. 'org-babel-load-languages
  3. '((emacs-lisp . t)
  4. (shell . t)))
  5. (setq org-export-backends '(ascii md html))
  6. (display-time-mode 1)
  7. (save-place-mode 1)
  8. (use-package magit)
  9. (setq
  10. user-mail-address "jbranso@dismail.de"
  11. user-full-name "Joshua Branson")
  12. (setq ;;disable gnus-select-method gnus-select-method '()
  13. gnus-secondary-select-methods '((nnimap "imap.dismail.de"))
  14. ;; save emails that gnus send to my Sent folder
  15. gnus-posting-styles
  16. '((".*"
  17. (gcc "\"nnimap+imap.dismail.de:Sent\"")
  18. ;; this custom header lets an email filter mark
  19. ;; this email as read.
  20. ("X-Gnus-Sucks" "I know man")))
  21. message-signature "\nJoshua Branson\nSent from the Hurd\n"
  22. ;; use msmtp to send email
  23. message-send-mail-function 'message-send-mail-with-sendmail
  24. send-mail-function 'message-send-mail-with-sendmail
  25. ;; change sendmail to msmtp
  26. sendmail-program "/usr/bin/msmtp"
  27. ;; this is a magic and necesary incantation
  28. message-sendmail-f-is-evil 't
  29. ;; tell msmtp which email account we are using
  30. message-sendmail-extra-arguments '("--read-envelope-from")
  31. )
  32. (add-hook 'text-mode-hook 'auto-fill-mode)
  33. ;; this is a hack. install markdown mode
  34. (add-hook 'fundmental-mode 'auto-fill-mode)
  35. (setq erc-hide-list '("JOIN" "KICK" "NICK" "PART" "QUIT" "MODE")
  36. erc-nick "gnucode"
  37. erc-server "irc.libera.chat"
  38. erc-autojoin-channels-alist
  39. '(("Libera.chat" "#emacs" "#guix" "#hurd" "#talos-workstation")
  40. ("OFTC" "chimera-linux")
  41. ))
  42. (defun my-erc ()
  43. "My autoconnecting to irc networks."
  44. (interactive)
  45. (erc :server "irc.libera.chat"
  46. :port "6667"
  47. :nick gnucode)
  48. (erc :server "irc.oftc.net"
  49. :port "6667"
  50. :nick "gnucode"))
  51. (setq package-selected-packages '(pinentry magit))
  52. (custom-set-faces
  53. ;; custom-set-faces was added by Custom.
  54. ;; If you edit it by hand, you could mess it up, so be careful.
  55. ;; Your init file should contain only one such instance.
  56. ;; If there is more than one, they won't work right.
  57. )
  58. (custom-set-variables
  59. ;; custom-set-variables was added by Custom.
  60. ;; If you edit it by hand, you could mess it up, so be careful.
  61. ;; Your init file should contain only one such instance.
  62. ;; If there is more than one, they won't work right.
  63. '(package-selected-packages '(debbugs evil pinentry magit))
  64. '(safe-local-variable-values '((projectile-project-compilation-dir . "c/"))))