diff options
| author | Case Duckworth | 2021-04-07 12:56:14 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-04-07 12:56:14 -0500 |
| commit | 0550d9ed977e6961e1ccaea601956a77b2760ffa (patch) | |
| tree | 512aa9a99d2a5a458bfdaf51ed2de6f0e8b9cf31 /lisp | |
| parent | Remove minibuffer hook and make deletions more smarter (diff) | |
| download | emacs-0550d9ed977e6961e1ccaea601956a77b2760ffa.tar.gz emacs-0550d9ed977e6961e1ccaea601956a77b2760ffa.zip | |
Add `acdw/find-emacs-dotfiles'
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/acdw.el | 8 |
1 files changed, 8 insertions, 0 deletions
| diff --git a/lisp/acdw.el b/lisp/acdw.el index 7b555fd..fd33514 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
| @@ -110,6 +110,14 @@ if MAKE-DIRECTORY is non-nil." | |||
| 110 | (run-at-time sunset-time (* 60 60 24) sunset-command) | 110 | (run-at-time sunset-time (* 60 60 24) sunset-command) |
| 111 | (run-at-time "12:00am" (* 60 60 24) sunset-command))) | 111 | (run-at-time "12:00am" (* 60 60 24) sunset-command))) |
| 112 | 112 | ||
| 113 | (defun acdw/find-emacs-dotfiles () | ||
| 114 | "Finds lisp files in `user-emacs-directory' and passes them to | ||
| 115 | `completing-read'." | ||
| 116 | (interactive) | ||
| 117 | (find-file (completing-read ".emacs: " | ||
| 118 | (directory-files-recursively | ||
| 119 | user-emacs-directory "\.el$")))) | ||
| 120 | |||
| 113 | 121 | ||
| 114 | ;; Make `C-z' more useful | 122 | ;; Make `C-z' more useful |
| 115 | (defvar acdw/leader | 123 | (defvar acdw/leader |