summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--init.org90
1 files changed, 23 insertions, 67 deletions
diff --git a/init.org b/init.org
index a3e062c..0276752 100644
--- a/init.org
+++ b/init.org
@@ -471,7 +471,7 @@
(defun jao-exwm-enable ()
(jao-load-org "exwm.org")
(setq jao-exwm-enabled-p t)
- (jao-ednc-setup 90)
+ ;; (jao-ednc-setup 90)
(exwm-enable)
(setq switch-window-input-style 'minibuffer
switch-window-minibuffer-shortcut nil)
@@ -1221,67 +1221,6 @@
#+begin_src emacs-lisp
(setq buffer-quit-function (lambda () t))
#+end_src
-*** bm.el (per buffer bookmarks)
- #+begin_src emacs-lisp
- (use-package bm
- :ensure t
- :demand t
-
- :init
- ;; style (only fringe)
- (setq bm-highlight-style 'bm-highlight-only-fringe)
-
- ;; restore on load (even before you require bm)
- (setq bm-restore-repository-on-load t)
-
- :config
- ;; Allow cross-buffer 'next'
- (setq bm-cycle-all-buffers t)
-
- ;; where to store persistant files
- (setq bm-repository-file "~/.emacs.d/cache/bm-repository")
-
- ;; save bookmarks
- (setq-default bm-buffer-persistence t)
-
- ;; Loading the repository from file when on start up.
- ;; (add-hook 'after-init-hook 'bm-repository-load)
-
- ;; Saving bookmarks
- (add-hook 'kill-buffer-hook #'bm-buffer-save)
-
- ;; Saving the repository to file when on exit.
- ;; kill-buffer-hook is not called when Emacs is killed, so we
- ;; must save all bookmarks first.
- (add-hook 'kill-emacs-hook #'(lambda ()
- (bm-buffer-save-all)
- (bm-repository-save)))
-
- ;; The `after-save-hook' is not necessary to use to achieve persistence,
- ;; but it makes the bookmark data in repository more in sync with the file
- ;; state.
- (add-hook 'after-save-hook #'bm-buffer-save)
-
- ;; Restoring bookmarks
- (add-hook 'find-file-hooks #'bm-buffer-restore)
- (add-hook 'after-revert-hook #'bm-buffer-restore)
-
- ;; The `after-revert-hook' is not necessary to use to achieve persistence,
- ;; but it makes the bookmark data in repository more in sync with the file
- ;; state. This hook might cause trouble when using packages
- ;; that automatically reverts the buffer (like vc after a check-in).
- ;; This can easily be avoided if the package provides a hook that is
- ;; called before the buffer is reverted (like `vc-before-checkin-hook').
- ;; Then new bookmarks can be saved before the buffer is reverted.
- ;; Make sure bookmarks is saved before check-in (and revert-buffer)
- ;; (add-hook 'vc-before-checkin-hook #'bm-buffer-save)
-
- :config (bm-repository-load)
-
- :bind (("<f4>" . bm-next)
- ("S-<f4>" . bm-previous)
- ("C-<f4>" . bm-toggle)))
- #+end_src
* Windows
*** Scrolling
#+BEGIN_SRC emacs-lisp
@@ -1311,11 +1250,32 @@
(global-set-key (kbd "C-x _") #'delete-other-windows-vertically)
#+end_src
+*** ace-window
+ An alternative is switch-window. The problem with it is that
+ commands such as C-x 4 f will use as default-dir the destination's
+ rather than the origin's, which kills the fun of it. ace-window
+ is not without warts, notably, lack of overlay for org buffers,
+ although, to be fair, that's possibly org's fault (but then, why
+ does switch-window's overlays work?).
+ #+begin_src emacs-lisp
+ (use-package ace-window
+ :ensure t
+ :init (setq aw-keys '(?a ?s ?d ?f ?g ?h ?j ?k ?l)
+ aw-char-position 'left ;; 'top-left
+ aw-ignore-current nil
+ aw-dispatch-when-more-than 3 ;; 2
+ aw-leading-char-style 'path
+ aw-display-mode-overlay t
+ aw-scope 'frame)
+ :bind (("M-o" . ace-window)
+ ("M-O" . ace-swap-window)
+ ("C-x p" . ace-window)))
+ #+end_src
*** Switch window
An alternative for this one is ace-window, but it has the problem
of not displaying its overlay over org buffers (sometimes) and
introducing a dependency (avy).
- #+begin_src emacs-lisp
+ #+begin_src emacs-lisp :load no
(use-package switch-window
:ensure t
:demand t
@@ -3065,10 +3025,6 @@
(add-hook 'magit-status-sections-hook #'forge-insert-requested-reviews t)
(add-hook 'magit-status-sections-hook #'forge-insert-assigned-issues t)
(add-hook 'magit-status-sections-hook #'forge-insert-issues t))
-
- (use-package orgit-forge
- :ensure t
- :after (org))
#+end_src
*** Other git packages
#+BEGIN_SRC emacs-lisp