diff options
| author | jao <jao@gnu.org> | 2022-01-28 18:28:17 +0000 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-01-28 23:26:55 +0000 |
| commit | fe17687ca528a8d8526f40e8ba895cf48800e803 (patch) | |
| tree | e13932390663d7e8e55608612bc182e90d4b0375 /lib | |
| parent | 305d1c5931a25f36bd2ba89b77971773b0de7ac4 (diff) | |
| download | elibs-fe17687ca528a8d8526f40e8ba895cf48800e803.tar.gz elibs-fe17687ca528a8d8526f40e8ba895cf48800e803.tar.bz2 | |
wee tweaks
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/eos/jao-afio.el | 12 |
1 files changed, 11 insertions, 1 deletions
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 <mail@jao.io> ;; Keywords: frames @@ -225,6 +225,16 @@ (?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) (global-set-key "\C-cg" 'jao-afio--goto-mail) |