Added --sudo to emacsremote.

This commit is contained in:
tastytea 2019-04-28 19:24:06 +02:00
parent fcba9657d1
commit b0b1e017a6

18
init.el
View File

@ -1,5 +1,5 @@
;;; init.el --- tastytea's Emacs init file. ;;; init.el --- tastytea's Emacs init file.
;; Time-stamp: <2019-04-26T09:31:26+00:00> ;; Time-stamp: <2019-04-26T14:52:56+00:00>
;;; Commentary: ;;; Commentary:
;; I am using this file with Emacs 26, but most of it will probably work with ;; I am using this file with Emacs 26, but most of it will probably work with
@ -550,16 +550,20 @@ With argument, do this that many times."
(add-hook 'projectile-after-switch-project-hook ; Does not work under :hook. (add-hook 'projectile-after-switch-project-hook ; Does not work under :hook.
'tabbar-ruler-group-by-projectile-project) 'tabbar-ruler-group-by-projectile-project)
(defun my/show-tabbar ()
"Show tabbar if it is hidden."
(when tabbar-ruler-tabbar-off
(tabbar-mode 1)
(setq tabbar-ruler-tabbar-off nil)
(ruler-mode -1)
(setq tabbar-ruler-ruler-off t)))
;; Show tabbar after 5 seconds idle. ;; Show tabbar after 5 seconds idle.
(run-with-idle-timer 5 t (lambda () (run-with-idle-timer 5 t (lambda () (my/show-tabbar)))
(when tabbar-ruler-tabbar-off
(tabbar-mode 1)
(setq tabbar-ruler-tabbar-off nil)
(ruler-mode -1)
(setq tabbar-ruler-ruler-off t))))
:bind :bind
("C-<prior>" . 'tabbar-ruler-tabbar-backward-tab) ("C-<prior>" . 'tabbar-ruler-tabbar-backward-tab)
("C-<next>" . 'tabbar-ruler-tabbar-forward-tab) ("C-<next>" . 'tabbar-ruler-tabbar-forward-tab)
:hook
(after-save . my/show-tabbar)
:custom-face :custom-face
(tabbar-selected ((t (tabbar-selected ((t
(:background "gray11" (:background "gray11"