oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~ivy-read -> completing-read

Browse Source 
More general purpose and useful
This commit is contained in:
dx
2020-05-24 00:41:30 +01:00
parent ab4f73cfbe
commit be26e8a68b
1 changed files with 4 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Install.org
View File

@@ -26,19 +26,13 @@ The main function used to retrieve all the stowable modules in the Dotfiles dire
** Stow module ** Stow module
Little elisp snippet to stow a specific module in the Dotfiles folder using ivy. Little elisp snippet to stow a specific module in the Dotfiles folder using ivy.
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
(ivy-read (async-shell-command (format "stow %s" (completing-read "Stow module: " (get-modules) nil t)) "*stow-output*" "*stow-error*")
"Stow module: "
(get-modules)
:require-match t
:action (lambda (choice) (async-shell-command (format "stow %s" choice) "*stow-output*" "*stow-error*")))
#+END_SRC #+END_SRC
** Delete module ** Delete module
#+BEGIN_SRC elisp #+BEGIN_SRC elisp
(ivy-read (async-shell-command
"Delete module: " (format "stow -D %s" (completing-read "Delete module: " (get-modules) nil t))
(get-modules) "*stow-output*" "*stow-error*")
:require-match t
:action (lambda (choice) (async-shell-command (format "stow -D %s" choice) "*stow-output*" "*stow-error*")))
#+END_SRC #+END_SRC
* Generate user directories * Generate user directories
This makes some useful directories that are used by the system and/or by me. I This makes some useful directories that are used by the system and/or by me. I