ReverseFlux

bm

Feb 7th, 2017
141
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.71 KB | None | 0 0
  1. (use-package bm
  2. :ensure t
  3. :demand t
  4.  
  5. :init
  6. ;; restore on load (even before you require bm)
  7. (setq bm-restore-repository-on-load t)
  8.  
  9.  
  10. :config
  11. ;; Allow cross-buffer 'next'
  12. (setq bm-cycle-all-buffers t)
  13.  
  14. ;; where to store persistant files
  15. (setq bm-repository-file "~/.emacs.d/bm-repository")
  16.  
  17. ;; save bookmarks
  18. (setq-default bm-buffer-persistence t)
  19.  
  20. ;; Loading the repository from file when on start up.
  21. (add-hook' after-init-hook 'bm-repository-load)
  22.  
  23. ;; Restoring bookmarks when on file find.
  24. (add-hook 'find-file-hooks 'bm-buffer-restore)
  25.  
  26. ;; Saving bookmarks
  27. (add-hook 'kill-buffer-hook #'bm-buffer-save)
  28.  
  29. ;; Saving the repository to file when on exit.
  30. ;; kill-buffer-hook is not called when Emacs is killed, so we
  31. ;; must save all bookmarks first.
  32. (add-hook 'kill-emacs-hook #'(lambda nil
  33. (bm-buffer-save-all)
  34. (bm-repository-save)))
  35.  
  36. ;; The `after-save-hook' is not necessary to use to achieve persistence,
  37. ;; but it makes the bookmark data in repository more in sync with the file
  38. ;; state.
  39. (add-hook 'after-save-hook #'bm-buffer-save)
  40.  
  41. ;; Restoring bookmarks
  42. (add-hook 'find-file-hooks #'bm-buffer-restore)
  43. (add-hook 'after-revert-hook #'bm-buffer-restore)
  44. (add-hook 'vc-before-checkin-hook #'bm-buffer-save)
  45.  
  46.  
  47. :bind (("<f3>" . bm-next)
  48. ("S-<f3>" . bm-previous)
  49. ("C-<f3>" . bm-toggle))
  50. )
Advertisement
Add Comment
Please, Sign In to add comment