Show tabbar after 5s idle.

This commit is contained in:
tastytea 2019-04-25 15:11:08 +02:00
parent 8a8766ec5e
commit 8aa0fb6358
2 changed files with 13 additions and 6 deletions

17
init.el
View File

@ -1,5 +1,5 @@
;;; init.el --- tastytea's Emacs init file.
;; Time-stamp: <2019-04-24T21:42:47+00:00>
;; Time-stamp: <2019-04-25T13:10:19+00:00>
;;; Commentary:
;; I am using this file with Emacs 26, but most of it will probably work with
@ -533,9 +533,9 @@ With argument, do this that many times."
(use-package tabbar-ruler
:pin melpa ; Faces are not correctly applied,
:after (projectile mode-icons) ; version from >=2016-08-02 is needed.
:init
(setq tabbar-ruler-global-tabbar t)
(setq tabbar-ruler-global-ruler t)
:custom
(tabbar-ruler-global-tabbar t)
(tabbar-ruler-global-ruler t)
:config
;; (tabbar-ruler-group-by-projectile-project) ; Group by projectile.
;; (tabbar-ruler-group-buffer-groups) ; Group by file type.
@ -544,11 +544,18 @@ With argument, do this that many times."
(add-hook 'projectile-after-switch-project-hook ; Does not work under :hook.
'tabbar-ruler-group-by-projectile-project)
;; Show tabbar after 5 seconds idle.
(run-with-idle-timer 5 t (lambda ()
(tabbar-mode 1)
(setq tabbar-ruler-tabbar-off nil)
(ruler-mode -1)
(setq tabbar-ruler-ruler-off t)
))
:bind
("C-<prior>" . 'tabbar-ruler-tabbar-backward-tab)
("C-<next>" . 'tabbar-ruler-tabbar-forward-tab)
:custom-face
;; I Have to set these 2 times, don't know why.
(tabbar-selected ((t
(:background "gray11"
:foreground "light gray"

View File

@ -1,2 +1,2 @@
127.0.0.1:51313 24392
127.0.0.1:51313 2299
phahw2ohVoh0oopheish7IVie9desh8aequeenei3uo8wahShe%thuadaeNa4ieh