Browse Source

Added GPG creditial management to ERC

master
Josh Wolfe 3 years ago
parent
commit
fbfaeb274d
1 changed files with 63 additions and 27 deletions
  1. 63
    27
      emacs/.emacs.d/README.org

+ 63
- 27
emacs/.emacs.d/README.org View File

@@ -506,6 +506,18 @@ Select project from list of projectile projects to invalidate.
(projectile-invalidate-cache t))
#+END_SRC

** User Pass Tupple

#+BEGIN_SRC emacs-lisp :tangle yes
(defun wolfe/get-user-pass ()
(split-string
(car (last (split-string
(shell-command-to-string (concat "gpg --output - --decrypt "
(expand-file-name "~")
"/.authinfo.gpg"))
"[|\n]" t "[ \n]"))) " "))
#+END_SRC

* Org Mode
** General

@@ -773,7 +785,9 @@ Customizable popup menus.

(:states 'normal
"C-z" 'wolfe/controlz
:prefix "g"
"C-l" 'evil-ex-nohighlight)

(:states 'normal :prefix "g"
"a" (lambda (beginning end)
(interactive "r")
(if (use-region-p)
@@ -969,12 +983,13 @@ Project management
#+END_SRC

* Utility
** Restclient

Postman inside of emacs.
** Ranger

#+BEGIN_SRC emacs-lisp :tangle yes
(use-package restclient)
(use-package ranger
:config
(setq ranger-cleanup-on-disable t)
(ranger-override-dired-mode t))
#+END_SRC

** Iedit
@@ -987,22 +1002,12 @@ Edit all instances of a string
(setq iedit-toggle-key-default nil))
#+END_SRC

** Delight
** Restclient

Postman inside of emacs.

#+BEGIN_SRC emacs-lisp :tangle yes
(use-package delight
:config
(delight '((emacs-lisp-mode "ξ" :major)
(lisp-interaction-mode "λ" :major)
(python-mode "π" :major)
(org-mode "Ø" :major)
(company-mode " C" company)
(ivy-mode " ι" ivy)
(projectile-mode " ρ" projectile)
(eldoc-mode " ε" eldoc)
(flycheck-mode " ƒ" flycheck)
(undo-tree-mode "" undo-tree)
(auto-revert-mode "" autorevert))))
(use-package restclient)
#+END_SRC

** Help Fns+
@@ -1019,17 +1024,48 @@ Edit all instances of a string
(setq jiralib-url "https://indigoca.atlassian.net"))
#+END_SRC

** Circe
** IRC

#+BEGIN_SRC emacs-lisp :tangle yes
(use-package erc
:ensure nil
:config
(add-hook 'window-configuration-change-hook
'(lambda ()
(setq erc-fill-column (- (window-width) 2))))

(setq erc-rename-buffers t
erc-interpret-mirc-color t
erc-lurker-hide-list '("JOIN" "PART" "QUIT"))

(defun wolfe/irc ()
(interactive)
(let* ((tupple (wolfe/get-user-pass))
(user (car tupple))
(pass (cadr tupple)))
(erc
:server "irc.freenode.net"
:port 6667
:nick user
:password pass))))
#+END_SRC

** Delight

#+BEGIN_SRC emacs-lisp :tangle yes
(use-package circe
(use-package delight
:config
(setq circe-network-options
'(("Freenode"
:tls t
:nick "interior"
:channels ("#emacs")
))))
(delight '((emacs-lisp-mode "ξ" :major)
(lisp-interaction-mode "λ" :major)
(python-mode "π" :major)
(org-mode "Ø" :major)
(company-mode " C" company)
(ivy-mode " ι" ivy)
(projectile-mode " ρ" projectile)
(eldoc-mode " ε" eldoc)
(flycheck-mode " ƒ" flycheck)
(undo-tree-mode "" undo-tree)
(auto-revert-mode "" autorevert))))
#+END_SRC

* Completion

Loading…
Cancel
Save