some keybindings for org and better wayland emacs
This commit is contained in:
		
							parent
							
								
									f9454c847b
								
							
						
					
					
						commit
						40ad9fe1c1
					
				
					 2 changed files with 14 additions and 21 deletions
				
			
		
							
								
								
									
										10
									
								
								README.org
									
										
									
									
									
								
							
							
						
						
									
										10
									
								
								README.org
									
										
									
									
									
								
							| 
						 | 
				
			
			@ -103,11 +103,12 @@ In order to have this config work on both my desktop with regular joe-schmoe mon
 | 
			
		|||
(defun chris/set-transparency ()
 | 
			
		||||
  "Set the frame to be transparent on Wayland compositors"
 | 
			
		||||
  (if (string-search "wayland" x-display-name)
 | 
			
		||||
       ((set-frame-parameter (selected-frame) 'alpha '(100 . 100))
 | 
			
		||||
       '((set-frame-parameter (selected-frame) 'alpha '(100 . 100))
 | 
			
		||||
       (set-frame-parameter (selected-frame) 'undecorated t)
 | 
			
		||||
       (add-to-list 'default-frame-alist '(undecorated . t))
 | 
			
		||||
       (add-to-list 'default-frame-alist '(alpha . (100 . 100)))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(alpha . (100 . 100))))))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(alpha . (100 . 100)))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(undecorated . t)))))
 | 
			
		||||
 | 
			
		||||
(if (daemonp)
 | 
			
		||||
    (add-hook 'after-make-frame-functions
 | 
			
		||||
| 
						 | 
				
			
			@ -1204,7 +1205,10 @@ Part of this config includes some special capture templates for my work as a you
 | 
			
		|||
           "RET" 'chris/org-dwim-at-point
 | 
			
		||||
           "gC" 'chris/org-columns-view
 | 
			
		||||
           "ge" 'org-edit-src-code
 | 
			
		||||
           "t" 'org-todo)
 | 
			
		||||
           "t" 'org-todo
 | 
			
		||||
           "C-i" 'completion-at-point)
 | 
			
		||||
  ('insert org-mode-map
 | 
			
		||||
           "C-i" 'completion-at-point)
 | 
			
		||||
  ('normal 'org-src-mode-map
 | 
			
		||||
           "q" 'org-edit-src-abort))
 | 
			
		||||
#+end_src
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
							
								
								
									
										25
									
								
								init.el
									
										
									
									
									
								
							
							
						
						
									
										25
									
								
								init.el
									
										
									
									
									
								
							| 
						 | 
				
			
			@ -39,11 +39,12 @@
 | 
			
		|||
(defun chris/set-transparency ()
 | 
			
		||||
  "Set the frame to be transparent on Wayland compositors"
 | 
			
		||||
  (if (string-search "wayland" x-display-name)
 | 
			
		||||
       ((set-frame-parameter (selected-frame) 'alpha '(100 . 100))
 | 
			
		||||
       '((set-frame-parameter (selected-frame) 'alpha '(100 . 100))
 | 
			
		||||
       (set-frame-parameter (selected-frame) 'undecorated t)
 | 
			
		||||
       (add-to-list 'default-frame-alist '(undecorated . t))
 | 
			
		||||
       (add-to-list 'default-frame-alist '(alpha . (100 . 100)))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(alpha . (100 . 100))))))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(alpha . (100 . 100)))
 | 
			
		||||
       (add-to-list 'initial-frame-alist '(undecorated . t)))))
 | 
			
		||||
 | 
			
		||||
(if (daemonp)
 | 
			
		||||
    (add-hook 'after-make-frame-functions
 | 
			
		||||
| 
						 | 
				
			
			@ -807,7 +808,10 @@ vertically."
 | 
			
		|||
           "RET" 'chris/org-dwim-at-point
 | 
			
		||||
           "gC" 'chris/org-columns-view
 | 
			
		||||
           "ge" 'org-edit-src-code
 | 
			
		||||
           "t" 'org-todo)
 | 
			
		||||
           "t" 'org-todo
 | 
			
		||||
           "C-i" 'completion-at-point)
 | 
			
		||||
  ('insert org-mode-map
 | 
			
		||||
           "C-i" 'completion-at-point)
 | 
			
		||||
  ('normal 'org-src-mode-map
 | 
			
		||||
           "q" 'org-edit-src-abort))
 | 
			
		||||
 | 
			
		||||
| 
						 | 
				
			
			@ -1637,18 +1641,3 @@ interfere with the default `bongo-playlist-buffer'."
 | 
			
		|||
        gcmh-verbose nil))
 | 
			
		||||
 | 
			
		||||
(setq warning-suppress-types '((comp)))
 | 
			
		||||
(custom-set-variables
 | 
			
		||||
 ;; custom-set-variables was added by Custom.
 | 
			
		||||
 ;; If you edit it by hand, you could mess it up, so be careful.
 | 
			
		||||
 ;; Your init file should contain only one such instance.
 | 
			
		||||
 ;; If there is more than one, they won't work right.
 | 
			
		||||
 '(org-agenda-files
 | 
			
		||||
   '("/home/chris/org/todo/inbox.org" "/home/chris/org/todo/notes.org" "/home/chris/org/repetition.org" "/home/chris/org/tfc_plans.org" "/home/chris/org/ministry_team.org" "/home/chris/org/todo/todo.org" "/home/chris/org/newsletter.org" "/home/chris/org/archive.org" "/home/chris/org/nvtfc_social_media.org" "/home/chris/org/lessons/last_night_2021.org" "/home/chris/org/lessons/lesson_10_saul_to_paul.org" "/home/chris/org/lessons/lesson_11_peter_with_the_gentiles.org" "/home/chris/org/lessons/lesson_12_james_peter_herod.org" "/home/chris/org/lessons/lesson_13_overview_of_missions_and_prayer_stations.org" "/home/chris/org/lessons/lesson_13_overview_of_missions_prayer_stations.org" "/home/chris/org/lessons/lesson_14_jerusalem_council.org" "/home/chris/org/lessons/lesson_15_singing_praising_and_repentant_jailers.org" "/home/chris/org/lessons/lesson_16_dismantling_idols.org" "/home/chris/org/lessons/lesson_17_gospel_of_paul_s_3rd_mission.org" "/home/chris/org/lessons/lesson_18_paul_and_the_shipwreck.org" "/home/chris/org/lessons/lesson_19_paul_s_journey_to_rome.org" "/home/chris/org/lessons/lesson_1_context_2020_21.org" "/home/chris/org/lessons/lesson_20_wrap_up.org" "/home/chris/org/lessons/lesson_4_fellowship_of_believers_2020_21.org" "/home/chris/org/lessons/lesson_6_peter_and_john_3_4.org" "/home/chris/org/lessons/lesson_7_persecuted_church_2020_21.org" "/home/chris/org/lessons/lesson_9_phillip_and_the_eunuch.org"))
 | 
			
		||||
 '(pdf-misc-print-program "/usr/bin/lpr" t)
 | 
			
		||||
 '(pdf-misc-print-program-args '("-o media=Letter" "-o fitplot") t))
 | 
			
		||||
(custom-set-faces
 | 
			
		||||
 ;; custom-set-faces was added by Custom.
 | 
			
		||||
 ;; If you edit it by hand, you could mess it up, so be careful.
 | 
			
		||||
 ;; Your init file should contain only one such instance.
 | 
			
		||||
 ;; If there is more than one, they won't work right.
 | 
			
		||||
 )
 | 
			
		||||
| 
						 | 
				
			
			
 | 
			
		|||
		Loading…
	
	Add table
		Add a link
		
	
		Reference in a new issue