Open wallabag on its own workspace

This commit is contained in:
coolneng 2022-09-18 19:03:52 +02:00
parent 88e7aeae2c
commit 6b9ec0057f
Signed by: coolneng
GPG Key ID: 9893DA236405AF57
2 changed files with 22 additions and 3 deletions

5
+ui.el
View File

@ -56,3 +56,8 @@
:when (featurep! :app rss) :when (featurep! :app rss)
:face (:inherit (doom-dashboard-menu-title bold)) :face (:inherit (doom-dashboard-menu-title bold))
:action =rss) t) :action =rss) t)
(add-to-list '+doom-dashboard-menu-sections
'("Read saved articles"
:icon (all-the-icons-octicon "book" :face 'doom-dashboard-menu-title)
:face (:inherit (doom-dashboard-menu-title bold))
:action =wallabag) t)

View File

@ -89,6 +89,20 @@
(add-hook! 'doom-real-buffer-functions (add-hook! 'doom-real-buffer-functions
(defun +rss-buffer-p (buf) (defun +rss-buffer-p (buf)
(string-match-p "^\\*wallabag" (buffer-name buf)))) (string-match-p "^\\*wallabag" (buffer-name buf))))
(defvar +wallabag-workspace-name "*wallabag*")
(defun =wallabag ()
"Activate (or switch to) `wallabag' in its workspace."
(interactive)
(if (modulep! :ui workspaces)
(progn
(+workspace-switch +wallabag-workspace-name t)
(doom/switch-to-scratch-buffer)
(wallabag)
(+workspace/display))
(setq +wallabag--wconf (current-window-configuration))
(delete-other-windows)
(switch-to-buffer (doom-fallback-buffer))
(wallabag)))
;; Set up elfeed ;; Set up elfeed
(after! elfeed (after! elfeed
(setq elfeed-use-curl t) (setq elfeed-use-curl t)