Ecosyste.ms: Awesome

An open API service indexing awesome lists of open source software.

Awesome Lists | Featured Topics | Projects

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

Awesome Lists containing this project

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)