diff options
| author | dx <aryadevchavali1@gmail.com> | 2020-05-24 00:41:30 +0100 |
|---|---|---|
| committer | dx <aryadevchavali1@gmail.com> | 2020-05-24 00:41:30 +0100 |
| commit | be26e8a68b22f57880805b6301ed8b7ed32eef81 (patch) | |
| tree | d9069d6cbac71b14b2c50bceca551ae436c8633e /Install.org | |
| parent | ab4f73cfbe2c9fd03baf415ced8e384cce72f5d0 (diff) | |
| download | dotfiles-be26e8a68b22f57880805b6301ed8b7ed32eef81.tar.gz dotfiles-be26e8a68b22f57880805b6301ed8b7ed32eef81.tar.bz2 dotfiles-be26e8a68b22f57880805b6301ed8b7ed32eef81.zip | |
~ivy-read -> completing-read
More general purpose and useful
Diffstat (limited to 'Install.org')
| -rw-r--r-- | Install.org | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/Install.org b/Install.org index 4808922..f162e5f 100644 --- a/Install.org +++ b/Install.org @@ -26,19 +26,13 @@ The main function used to retrieve all the stowable modules in the Dotfiles dire ** Stow module Little elisp snippet to stow a specific module in the Dotfiles folder using ivy. #+BEGIN_SRC elisp -(ivy-read - "Stow module: " - (get-modules) - :require-match t - :action (lambda (choice) (async-shell-command (format "stow %s" choice) "*stow-output*" "*stow-error*"))) +(async-shell-command (format "stow %s" (completing-read "Stow module: " (get-modules) nil t)) "*stow-output*" "*stow-error*") #+END_SRC ** Delete module #+BEGIN_SRC elisp -(ivy-read - "Delete module: " - (get-modules) - :require-match t - :action (lambda (choice) (async-shell-command (format "stow -D %s" choice) "*stow-output*" "*stow-error*"))) +(async-shell-command + (format "stow -D %s" (completing-read "Delete module: " (get-modules) nil t)) + "*stow-output*" "*stow-error*") #+END_SRC * Generate user directories This makes some useful directories that are used by the system and/or by me. I |