system-manager-wakasu
 1;;; config-misc.el --- -*- lexical-binding: t; -*-
 2;;; Commentary:
 3;;; Miscellaneous modes configuration
 4;;; Code:
 5
 6;; (use-package password-store
 7;;   :custom
 8;;   (password-store-executable "passage"))
 9
10(defvar passage-program "passage"
11  "The path to the `passage` executable.")
12
13(defun passage-get (password-name)
14  "Return the password for PASSWORD-NAME from `passage show`."
15  (let ((password (shell-command-to-string (concat passage-program " show " (shell-quote-argument password-name)))))
16    (string-trim password))) ; Trim whitespace here
17
18(use-package helpful
19  :unless noninteractive
20  :bind (("C-h f" . helpful-callable)
21         ("C-h F" . helpful-function)
22         ("C-h M" . helpful-macro)
23         ("C-c h S" . helpful-at-point)
24         ("C-h k" . helpful-key)
25         ("C-h v" . helpful-variable)
26         ("C-h C" . helpful-command)))
27
28(provide 'config-misc)
29;;; config-misc.el ends here