diff options
| author | Amin Bandali <bandali@gnu.org> | 2019-09-06 18:06:55 -0400 |
|---|---|---|
| committer | Amin Bandali <bandali@gnu.org> | 2019-09-06 18:07:27 -0400 |
| commit | cbe95dea5068fa849d3316ce298622fc05725436 (patch) | |
| tree | 3b092075e30397a3aaa3d5dd8c484d2bb87d7275 | |
| parent | cb058d219446b570acb36284353063ddd5914f3c (diff) | |
| download | configs-cbe95dea5068fa849d3316ce298622fc05725436.tar.gz configs-cbe95dea5068fa849d3316ce298622fc05725436.tar.xz configs-cbe95dea5068fa849d3316ce298622fc05725436.zip | |
emacs: exwm: add smooth-scrolling with C-p and C-n when in zathura
| -rw-r--r-- | .emacs.d/init.el | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index e132088..0f080b6 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -718,16 +718,20 @@ around if needed." (exwm-manage-finish . (lambda () (when exwm-class-name (cond - ((string= exwm-class-name "URxvt") - (exwm-input-set-local-simulation-keys - '(([?\C-c ?\C-c] . [?\C-c]) - ([?\C-c ?\C-u] . [?\C-u])))) ((string= exwm-class-name "Abrowser") (exwm-input-set-local-simulation-keys `(,@exwm-input-simulation-keys ([?\C-\S-d] . [?\C-d]) ([?\C-q] . [?\C-w]) - ([?\s-q] . [?\C-q]))))))))) + ([?\s-q] . [?\C-q])))) + ((string= exwm-class-name "URxvt") + (exwm-input-set-local-simulation-keys + '(([?\C-c ?\C-c] . [?\C-c]) + ([?\C-c ?\C-u] . [?\C-u])))) + ((string= exwm-class-name "Zathura") + (exwm-input-set-local-simulation-keys + '(([?\C-p] . [C-up]) + ([?\C-n] . [C-down]))))))))) (use-feature exwm-randr :demand |