← All posts tagged Scheme

a13

head /etc/ardour2/ergonomic-us.bindings
; ardour GtkAccelMap rc-file         -*- scheme -*-
; this file is an automated accelerator map dump
;
; (gtk_accel_path "<Actions>/RegionList/RegionListSort" "")
(gtk_accel_path "<Actions>/Common/Quit" "<Ctrl>q")
(gtk_accel_path "<Actions>/Common/Save" "<Ctrl>s")
; (gtk_accel_path "<Actions>/Editor/Pullup" "")
; (gtk_accel_path "<Actions>/Editor/zoom-to-session" "")
; (gtk_accel_path "<Actions>/JACK/JACKReconnect" "")
; (gtk_accel_path "<Actions>/Editor/Autoconnect" "")


например

a13

вставляем в ~/.xbindkeys.scm

(use-modules (system repl server))
(spawn-server)

и наслаждаемся удалённым repl (например через geiser)
Единственная проблема — для того, чтобы заставить использовать нововведенный биндинг, помимо (grab-all-keys) почему-то требуется нажатие любой из определённых ранее комбинаций клавиш.

p.s. xbindkeys должен быть собран с guile > 2.0