youthlic/nixos
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

chore: Change colorschemes

Browse source
This commit is contained in:
ulic-youthlic 2025-10-18 23:10:53 +08:00
parent 400e5dab02
commit f8cab1db34
Signed by: youthlic
GPG key ID: 63E86C3C14A0D721
5 changed files with 19 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

42
pkgs/doom-emacs/config/config.el
View file

@ -12,7 +12,7 @@
(setq doom-font (font-spec
:family "Maple Mono NF CN"
:size 20))
(setq doom-theme 'doom-gruvbox)
(setq doom-theme 'doom-one-light)
;;; Fix failure to locate 'Symbols Nerd Font Mono' font
(setq nerd-icons-font-family "Maple Mono NF CN")
@ -42,26 +42,6 @@
(append exec-path
my/emacs-deps-exec-path))))
(advice-add #'telega-chatbuf-attach-clipboard
:override #'(lambda (doc-p)
(interactive "P")
(let* ((selection-coding-system 'no-conversion) ;for rawdata
(temporary-file-directory telega-temp-dir)
(tmpfile (telega-temp-name "clipboard" ".png"))
(coding-system-for-write 'binary))
(if (eq system-type 'darwin)
(progn
;; NOTE: On MacOS, try extracting clipboard using pngpaste
(unless (executable-find "pngpaste")
(error "Please install pngpaste to paste images"))
(unless (= 0 (telega-screenshot-with-pngpaste tmpfile))
(error "No image in CLIPBOARD")))
(let ((image-data (or (gui-get-selection 'CLIPBOARD 'image/png)
(gui-get-selection 'CLIPBOARD 'image/jpeg)
(error "No image in CLIPBOARD"))))
(write-region image-data nil tmpfile nil 'quiet)))
(telega-chatbuf-attach-media tmpfile (when doc-p 'preview)))))
(defun +telega-save-file-to-clipboard (msg)
"Save file at point to clipboard.
NOTE: wayland only."
@ -70,19 +50,19 @@ NOTE: wayland only."
(unless file
(user-error "No file associated with message"))
(telega-file--download file
:priority 32
:update-callback
(lambda (dfile)
(telega-msg-redisplay msg)
(message "Wait for downloading to finish…")
(when (telega-file--downloaded-p dfile)
(let* ((fpath (telega--tl-get dfile :local :path)))
(shell-command (format "wl-copy < \"%s\"" fpath))
(message (format "File saved to clipboard: %s" fpath))))))))
:priority 32
:update-callback
(lambda (dfile)
(telega-msg-redisplay msg)
(message "Wait for downloading to finish…")
(when (telega-file--downloaded-p dfile)
(let* ((fpath (telega--tl-get dfile :local :path)))
(shell-command (format "wl-copy < \"%s\"" fpath))
(message (format "File saved to clipboard: %s" fpath))))))))
(map! :map global-map
"C-c n"
#'helm-nixos-options)
#'company-nixos-options)
(with-eval-after-load 'evil
(scroll-on-jump-advice-add evil-redo)