Wayland changes not perfect
This commit is contained in:
parent
0398122164
commit
20304a1406
2 changed files with 80 additions and 29 deletions
52
init.el
52
init.el
|
@ -32,12 +32,20 @@
|
|||
(set-face-attribute 'variable-pitch nil :font "Cantarell"
|
||||
:height (+ chris/default-font-size (/ chris/default-font-size 8)) :weight 'regular))
|
||||
|
||||
;; (defun chris/set-transparency ()
|
||||
;; "Set the frame to be transparent on Wayland compositors"
|
||||
;; (if (string= x-display-name "wayland-0")
|
||||
;; ((set-frame-parameter (selected-frame) 'alpha '(90 . 90))
|
||||
;; (add-to-list 'default-frame-alist '(alpha . (90 . 90))))))
|
||||
|
||||
(if (daemonp)
|
||||
(add-hook 'after-make-frame-functions
|
||||
(lambda (frame)
|
||||
(with-selected-frame frame
|
||||
(chris/set-font-faces))))
|
||||
(chris/set-font-faces)
|
||||
(chris/set-transparency))))
|
||||
(chris/set-font-faces))
|
||||
;; (chris/set-transparency))
|
||||
|
||||
(setq display-line-numbers-type 'relative)
|
||||
(global-display-line-numbers-mode +1)
|
||||
|
@ -50,6 +58,8 @@
|
|||
|
||||
(recentf-mode +1)
|
||||
|
||||
(server-start)
|
||||
|
||||
(setq straight-fix-org t)
|
||||
(defvar bootstrap-version)
|
||||
(let ((bootstrap-file
|
||||
|
@ -205,7 +215,8 @@
|
|||
(general-def 'minibuffer-local-map
|
||||
"C-v" 'evil-paste-after)
|
||||
(general-def 'normal
|
||||
"gcc" 'comment-line))
|
||||
"gcc" 'comment-line
|
||||
"K" 'helpful-at-point))
|
||||
|
||||
(use-package evil-escape
|
||||
:after evil
|
||||
|
@ -462,7 +473,7 @@ vertically."
|
|||
(setq org-capture-templates
|
||||
'(("t" "Personal todo" entry
|
||||
(file+headline "todo.org" "Inbox")
|
||||
"* TODO %^{TODO name}\nSCHEDULED: %T\n%a\n%i%?" :prepend t)
|
||||
(file ".templates/tasks.org") :prepend t)
|
||||
("n" "Personal notes" entry
|
||||
(file+headline "notes.org" "Inbox")
|
||||
"* %u %?\n%i\n%a" :prepend t)
|
||||
|
@ -497,7 +508,8 @@ vertically."
|
|||
"* %U %?\n %i\n %a" :heading "Notes" :prepend t)
|
||||
("oc" "Project changelog" entry #'+org-capture-central-project-changelog-file
|
||||
"* %U %?\n %i\n %a" :heading "Changelog" :prepend t))
|
||||
org-capture-use-agenda-date t)
|
||||
org-capture-use-agenda-date t
|
||||
org-agenda-timegrid-use-ampm t)
|
||||
|
||||
;;(setq org-superstar-headline-bullets-list '("◉" "◈" "▸" "✬" "◎" "◇" "❉" "✙" "❖"))
|
||||
(setq org-imenu-depth 4)
|
||||
|
@ -520,7 +532,8 @@ vertically."
|
|||
"/home/chris/org/ministry_team.org"
|
||||
"/home/chris/org/todo.org"
|
||||
"/home/chris/org/newsletter.org"
|
||||
"/home/chris/org/nvtfc_social_media.org"))
|
||||
"/home/chris/org/nvtfc_social_media.org"
|
||||
"/home/chris/org/lessons/"))
|
||||
;; (add-to-list '("/home/chris/org/inbox.org"
|
||||
;; "/home/chris/org/notes.org"
|
||||
;; "/home/chris/org/repetition.org"
|
||||
|
@ -650,7 +663,7 @@ vertically."
|
|||
:head "#+TITLE: ${title}\n#+AUTHOR: Chris Cochrun\n#+CREATED: %<%D - %I:%M %p>\n- tags %^G\n\n* ")
|
||||
("l" "TFC Lesson" plain (function org-roam--capture-get-point)
|
||||
(file ".templates/lessontemplate.org")
|
||||
:file-name "${slug}"
|
||||
:file-name "lessons/${slug}"
|
||||
:head "#+TITLE: ${title}\n#+AUTHOR: Chris Cochrun\n#+CREATED: %<%D - %I:%M %p>\n")))
|
||||
|
||||
(setq org-roam-dailies-capture-templates
|
||||
|
@ -1265,14 +1278,25 @@ interfere with the default `bongo-playlist-buffer'."
|
|||
(use-package transmission
|
||||
:commands (transmission)
|
||||
:config
|
||||
(setq transmission-host "192.168.1.7"
|
||||
transmission-rpc-path "/transmission/rpc"
|
||||
transmission-refresh-modes '(transmission-mode transmission-files-mode transmission-info-mode transmission-peers-mode))
|
||||
:general
|
||||
(chris/leader-keys
|
||||
:states 'normal
|
||||
:keymaps 'override
|
||||
"ot" 'transmission))
|
||||
|
||||
(if (string-equal (system-name) "syl")
|
||||
(setq transmission-host "home.cochrun.xyz"
|
||||
transmission-rpc-path "/transmission/rpc"
|
||||
transmission-refresh-modes '(transmission-mode
|
||||
transmission-files-mode
|
||||
transmission-info-mode
|
||||
transmission-peers-mode))
|
||||
(setq transmission-host "192.168.1.7"
|
||||
transmission-rpc-path "/transmission/rpc"
|
||||
transmission-refresh-modes '(transmission-mode
|
||||
transmission-files-mode
|
||||
transmission-info-mode
|
||||
transmission-peers-mode)))
|
||||
:general
|
||||
(chris/leader-keys
|
||||
:states 'normal
|
||||
:keymaps 'override
|
||||
"ot" 'transmission))
|
||||
|
||||
(setq gc-cons-threshold 2000000)
|
||||
(setq garbage-collection-messages nil)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue