From fe17687ca528a8d8526f40e8ba895cf48800e803 Mon Sep 17 00:00:00 2001 From: jao Date: Fri, 28 Jan 2022 18:28:17 +0000 Subject: wee tweaks --- lib/eos/jao-afio.el | 12 +++++++++++- 1 file changed, 11 insertions(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/eos/jao-afio.el b/lib/eos/jao-afio.el index e6fce03..978dbc8 100644 --- a/lib/eos/jao-afio.el +++ b/lib/eos/jao-afio.el @@ -1,6 +1,6 @@ ;;; jao-afio.el --- workspaces in just one frame -*- lexical-binding: t; -*- -;; Copyright (C) 2020, 2021 jao +;; Copyright (C) 2020, 2021, 2022 jao ;; Author: jao ;; Keywords: frames @@ -224,6 +224,16 @@ (?p "4") (?w "3"))) +;;;###autoload +(defun jao-afio-goto-nth (n) + (cl-case n + ((1) (jao-afio--goto-main)) + ((2) (jao-afio--goto-mail)) + ((3) (jao-afio--goto-www)) + ((4) (jao-afio--goto-docs)) + ((5) (jao-afio--goto-scratch-1)) + ((0) (jao-afio--goto-scratch)))) + ;;;###autoload (defun jao-afio-setup (&optional fallback-fun init-p) (global-set-key "\C-cf" 'jao-afio--goto-main) -- cgit v1.2.3