From fc13c6c69c88533730095f68230cfbd7ab5f645c Mon Sep 17 00:00:00 2001 From: Marcel Kapfer Date: Fri, 25 Nov 2022 17:18:40 +0100 Subject: [PATCH] =?UTF-8?q?=E2=9C=A8=20[tab-bar-helpers]=20Add=20Mastodon?= =?UTF-8?q?=20tab=20bar=20runner?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- packages/mmk2410-tab-bar-helpers.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/packages/mmk2410-tab-bar-helpers.el b/packages/mmk2410-tab-bar-helpers.el index 826a056..7a020c0 100644 --- a/packages/mmk2410-tab-bar-helpers.el +++ b/packages/mmk2410-tab-bar-helpers.el @@ -67,6 +67,11 @@ #'(lambda () (find-file "~/org/projects.org")))) +(defun mmk2410/tab-bar-run-mastodon () + "Switch or create a tab running mastodon.el." + (interactive) + (mmk2410/tab-bar-switch-or-create "Mastodon" #'mastodon)) + (defhydra mmk2410/tab-bar (:color teal :hint nil) " ^Apps^ ^Helpers^ ^Misc @@ -84,6 +89,7 @@ ("j" mmk2410/tab-bar-run-journal) ("m" mmk2410/tab-bar-run-mail) ("p" mmk2410/tab-bar-run-projects) + ("M" mmk2410/tab-bar-run-mastodon) ("RET" tab-bar-select-tab-by-name) ("SPC" mmk2410/tab-bar-new-named-tab) ("f" tab-bar-switch-to-recent-tab)