aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--oni/home/config/pop-os/emacs.el17
1 files changed, 14 insertions, 3 deletions
diff --git a/oni/home/config/pop-os/emacs.el b/oni/home/config/pop-os/emacs.el
index 381f93c..acdc488 100644
--- a/oni/home/config/pop-os/emacs.el
+++ b/oni/home/config/pop-os/emacs.el
@@ -136,15 +136,26 @@ buffers.")
(interactive)
(artisan--test-internal nil name ignore fail)))
(local-set-key (kbd "q") #'bury-buffer)
- (local-set-key (kbd "s") (lambda () (interactive) (interrupt-process))))))
+ (local-set-key (kbd "s") (lambda () (interactive) (interrupt-process)))
+ (local-set-key (kbd "M-p") (lambda ()
+ (interactive)
+ (search-backward " •")))
+ (local-set-key (kbd "M-n") (lambda ()
+ (interactive)
+ (search-forward " •"))))))
(require 'dashboard)
(dashboard-setup-startup-hook)
(run-with-idle-timer 300 t (lambda () (switch-to-buffer dashboard-buffer-name)))
(run-at-time "02:00" 86400 #'dashboard-open)
-(setq dashboard-navigator-buttons `(((,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "PRs" "Open pull requests"
+;;;
+(setq dashboard-navigator-buttons `(((,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "Conversations" "Open pull requests"
(lambda (&rest _)
- (browse-url "https://github.com/pulls?q=is%3Aopen+is%3Apr+org%3Ajuked-social+draft%3Afalse+review%3Anone+-author%3Aapp%2Fdependabot+-base%3Adev"))
+ (browse-url "https://github.com/pulls?q=commenter%3Atomw-punt+review%3Achanges_requested+is%3Aopen"))
+ default "[" "]")
+ (,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "PRs" "Open pull requests"
+ (lambda (&rest _)
+ (browse-url "https://github.com/pulls?q=is%3Aopen+is%3Apr+org%3Ajuked-social+draft%3Afalse+review%3Anone+-author%3Aapp%2Fdependabot+-base%3Adev+-base%3Amain"))
default "[" "]"))
((,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "back-end" "Unmerged into back-end"
(lambda (&rest _)