Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/lucashpandolfo/udisks
Udisks toy bindings for common lisp + stumpwm disk manager extension
https://github.com/lucashpandolfo/udisks
Last synced: 3 months ago
JSON representation
Udisks toy bindings for common lisp + stumpwm disk manager extension
- Host: GitHub
- URL: https://github.com/lucashpandolfo/udisks
- Owner: lucashpandolfo
- Created: 2013-02-02T15:39:01.000Z (almost 12 years ago)
- Default Branch: master
- Last Pushed: 2013-02-02T20:03:26.000Z (almost 12 years ago)
- Last Synced: 2024-06-12T00:11:43.452Z (5 months ago)
- Language: Common Lisp
- Size: 125 KB
- Stars: 4
- Watchers: 3
- Forks: 5
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
Awesome Lists containing this project
- awesome-stumpwm - udisks - Disk manager module (Modules)
README
UDisks: A toy cl udisks bindings
================================Mostly centered in block_devices
UDisks Manager for Stumpwm
==========================Setup
-----Copy or symlink the stumpwm/udisks-manager.lisp over to your stumpwm
plugins directory and add the following code to your .stumpwmrc file``` Lisp
;;Load the module and dependences
(ql:quickload "udisks")
(load-module "udisks-manager");;Handy commands
(stumpwm:defcommand show-devices () ()
"Show devices"
(stumpwm-udisks:show-devices-menu))(stumpwm:defcommand launch-udisks-manager () ()
"Launch (or relaunch) udisk manager"
(stumpwm-udisks:udisks-manager-launch));;optional: use another file manager
(setf stumpwm-udisks:*dir-open-command* "sakura -e mc ~s")
(setf stumpwm-udisks:*dir-open-command* "thunar ~s");etc;; Launch at init
(launch-udisks-manager)
```Screenshots
-----------![New device](screenshots/new.png)
![Devices menu](screenshots/menu.png)
![Actions menu](screenshots/actions.png)
![Actions menu2](screenshots/actions2.png)
![Unmount device](screenshots/unmounted.png)