update
This commit is contained in:
45
config.el
45
config.el
@@ -111,6 +111,14 @@ Funguje v libovolném textu, včetně Markdown linků (např. [x](./...))."
|
||||
("p" "Project task" entry
|
||||
(file "inbox.org")
|
||||
"* TODO %? :project:\n%U\n%a\n"))))
|
||||
(setq org-agenda-sorting-strategy
|
||||
'((agenda priority-down time-up)
|
||||
(todo priority-down)
|
||||
(tags priority-down)
|
||||
(search priority-down)))
|
||||
(setq org-priority-highest ?A
|
||||
org-priority-lowest ?C
|
||||
org-priority-default ?C)
|
||||
|
||||
;; --------------------------------------------------
|
||||
;; Dired
|
||||
@@ -357,3 +365,40 @@ Funguje v libovolném textu, včetně Markdown linků (např. [x](./...))."
|
||||
(setq org-idle-time 1.0)
|
||||
|
||||
|
||||
;; --- macOS clipboard: pbcopy/pbpaste (funguje i v terminal Emacs) ---
|
||||
(defun my/pbcopy (text &optional _push)
|
||||
"Send TEXT to the macOS clipboard using pbcopy."
|
||||
(let ((process-connection-type nil))
|
||||
(let ((proc (start-process "pbcopy" "*pbcopy*" "pbcopy")))
|
||||
(process-send-string proc text)
|
||||
(process-send-eof proc))))
|
||||
|
||||
(defun my/pbpaste ()
|
||||
"Return text from the macOS clipboard using pbpaste."
|
||||
(when (executable-find "pbpaste")
|
||||
(string-trim-right
|
||||
(shell-command-to-string "pbpaste"))))
|
||||
|
||||
(setq select-enable-clipboard t
|
||||
select-enable-primary t)
|
||||
|
||||
;; Emacs -> system clipboard
|
||||
(setq interprogram-cut-function #'my/pbcopy)
|
||||
;; system clipboard -> Emacs
|
||||
(setq interprogram-paste-function #'my/pbpaste)
|
||||
|
||||
;; Ať Evil používá clipboard (y/d/c budou do systému)
|
||||
(after! evil
|
||||
(setq evil-want-clipboard t))
|
||||
|
||||
|
||||
;; !!! DANGEROUS: disable TLS verification globally !!!
|
||||
(setq gnutls-verify-error nil)
|
||||
(setq gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")
|
||||
|
||||
(after! projectile
|
||||
(setq projectile-enable-caching nil
|
||||
projectile-indexing-method 'alien)
|
||||
(when (executable-find "fd")
|
||||
(setq projectile-generic-command
|
||||
"fd . -0 --type f --hidden --follow --exclude .git --color=never")))
|
||||
|
||||
@@ -64,3 +64,5 @@
|
||||
;; Centered cursor
|
||||
(package! centered-cursor-mode)
|
||||
|
||||
;; Emmet
|
||||
(package! ement)
|
||||
|
||||
Reference in New Issue
Block a user