Compare commits
4 Commits
d2cbdc3289
...
a28bd018bf
Author | SHA1 | Date | |
---|---|---|---|
a28bd018bf | |||
18db59d9f7 | |||
c3d53388ab | |||
b0a356a5fe |
|
@ -59,7 +59,7 @@ if [[ $CLI == "YES" ]] ; then
|
|||
else
|
||||
pkgname="emacs-phundrak-git"
|
||||
fi
|
||||
pkgver=28.0.60.150962
|
||||
pkgver=28.0.60.150968
|
||||
pkgrel=1
|
||||
pkgdesc="GNU Emacs. Development master branch with Phundrak’s tweaks."
|
||||
arch=('x86_64')
|
||||
|
|
|
@ -131,7 +131,7 @@ pointer as well as get a bunch of stuff started. To see what’s in the
|
|||
~autostart~ script, [[file:bin.org::#Autostart-a99e99e7][see here]].
|
||||
#+begin_src lisp
|
||||
(run-shell-command "xsetroot -cursor_name left_ptr")
|
||||
(run-shell-command "autostart")
|
||||
(run-shell-command "sleep 1 && autorandr vertical && autorandr horizontal && autostart")
|
||||
#+end_src
|
||||
|
||||
Now, we’ll load a couple of my custom files that will be described below:
|
||||
|
@ -218,8 +218,7 @@ including a short description of what they are for:
|
|||
In order to be able to use MPD from StumpWM itself, we’ll need to
|
||||
connect to it.
|
||||
#+begin_src lisp
|
||||
(when *initializing*
|
||||
(mpd-connect))
|
||||
(mpd:mpd-connect)
|
||||
#+end_src
|
||||
|
||||
Finally, we can notify the user everything is ready.
|
||||
|
@ -1083,6 +1082,29 @@ then attempt to connect to it.
|
|||
(bluetooth-connect-device choice)))
|
||||
#+end_src
|
||||
|
||||
*** Keybinds
|
||||
:PROPERTIES:
|
||||
:CUSTOM_ID: Utilities-Bluetooth-Keybinds-gxjaagl05aj0
|
||||
:END:
|
||||
It’s all nice and all, but typing manually the commands with ~s-SPC ;~
|
||||
is a bit tiring, so let’s define our bluetooth keymap which we will
|
||||
bind to ~s-SPC B~.
|
||||
#+name: bluetooth-keymap
|
||||
| Keychord | Command |
|
||||
|----------+--------------------|
|
||||
| ~c~ | ~bluetooth-connect~ |
|
||||
| ~o~ | ~bluetooth-turn-on~ |
|
||||
| ~O~ | ~bluetooth-turn-off~ |
|
||||
|
||||
#+begin_src lisp
|
||||
(defvar *my-bluetooth-keymap*
|
||||
(let ((m (make-sparse-keymap)))
|
||||
<<keybinds-gen(map="m", keybinds=bluetooth-keymap)>>
|
||||
m))
|
||||
|
||||
(define-key *root-map* (kbd "B") '*my-bluetooth-keymap*)
|
||||
#+end_src
|
||||
|
||||
** NetworkManager integration
|
||||
:PROPERTIES:
|
||||
:CUSTOM_ID: Utilities-NetworkManager-integration-nm7jxbt0z9j0
|
||||
|
|
Loading…
Reference in New Issue
Block a user