If you are using a Hi-DPI display, uncomment this to double the icon size. Treemacs-width 35 ) The default width and height of the icons is 22 pixels.
Treemacs-recenter-after-project-jump 'always Treemacs-persist-file (expand-file-name ".cache/treemacs-persist" user-emacs-directory ) Treemacs-goto-tag-strategy 'refetch-index Treemacs-file-name-transformer #'identity Treemacs-file-extension-regex treemacs-last-period-regex-value Treemacs-directory-name-transformer #'identity (define-key winum-keymap (kbd "M-0" ) #'treemacs-select-window ) ) :config ( progn ( setq treemacs-collapse-dirs ( if treemacs-python-executable 3 0 ) ( lambda (selection ) selection ) ) ) ) ) ) ( setq result (helm-other-buffer ' (tmpsource ) "*helm-select-yasnippet" ) ) ( if (null result ) ( signal 'quit "user quit!" ) (cdr (assoc result rmap ) ) ) ) (cons 'name prompt ) (cons 'candidates cands ) '" ( interactive ) ( setq display-fn ( or display-fn 'identity ) ) ( if ( require ' helm-config ) ( let (tmpsource cands result rmap ) ( setq cands (mapcar ( lambda (x ) (funcall display-fn x ) ) choices ) ) ( setq rmap (mapcar ( lambda (x ) (cons (funcall display-fn x ) x ) ) choices ) ) ( setq tmpsource Plain-tex-mode ) ) ( let ( (mark-even-if-inactive transient-mark-mode ) ) (indent-region (region-beginning ) (region-end ) nil ) ) ) ) ) ) ( defun shk-yas/helm-prompt (prompt choices &optional display-fn ) "Use helm to select a snippet. ` ( defadvice ,command (after indent-region activate ) ( and (not current-prefix-arg ) (member major-mode
:init (yas-global-mode ) :config ( progn (yas-global-mode ) (add-hook 'hippie-expand-try-functions-list 'yas-hippie-try-expand ) ( setq yas-key-syntaxes ' ( "w_" "w_." "^ " ) ) (setq yas-installed-snippets-dir "~/elisp/yasnippet-snippets") ( setq yas-expand-only-for-last-commands nil ) (yas-global-mode 1 ) ( bind-key "\t" 'hippie-expand yas-minor-mode-map ) (add-to-list 'yas-prompt-functions 'shk-yas/helm-prompt ) ) ) ( dolist (command ' (yank yank-pop ) ) (eval ( use-package yasnippet :diminish yas-minor-mode \\ (?: ~> \\ | ~~ \\ | \\ ) " ) ) ) ) ( dolist (char-regexp alist ) (set-char-table-range composition-function-table (car char-regexp ) :weight 'Normal ) ( dolist (charset ' (kana han symbol cjk-misc bopomofo ) ) (set-fontset-font (frame-parameter nil 'font )Ĭharset (font-spec :family "Microsoft Yahei" :size 13 ) ) ) ( let ( (alist ' ( (33. :family "LigaSauceCodeProMedium Nerd Font" :height 130 ( if (display-graphic-p ) ( progn (set-face-attribute 'default nil doom-modeline-mode ) ) (set-face-background 'mode-line nil ) :config (load-theme 'doom-nord ) ) ) nerd-icons (add-to-list 'load-path (expand-file-name "~/.emacs.d/site-lisp/nerd-icons")) (require 'nerd-icons) modeline ( use-package doom-modeline :ensure t :config (load-theme 'darkokai t ) ) ( use-package doom-themes :ensure t (doom-themes-org-config ) ) ( if (string-equal system-type "darwin" ) ( use-package darkokai-theme :ensure t ( setq custom-safe-themes t ) doom theme enable ( use-package doom-themes :config Global settings (defaults) ( setq doom-themes-enable-bold t if nil, bold is universally disabledĭoom-themes-enable-italic t ) if nil, italics is universally disabled Enable flashing mode-line on errors (doom-themes-visual-bell-config ) ( if (display-graphic-p ) ( progn Enable custom neotree theme (all-the-icons must be installed!) (doom-themes-neotree-config ) or for treemacs users ( setq doom-themes-treemacs-theme "doom-colors" ) use the colorful treemacs theme (doom-themes-treemacs-config ) ) ) Corrects (and improves) org-mode's native fontification.
Emacs list directory contents install#
"" ) ) ) (package-initialize ) Install use-package if not available ( unless (package-installed-p 'use-package ) (package-refresh-contents ) (package-install 'use-package ) ) ( eval-when-compile ( require ' use-package ) ) ( setq use-package-verbose t ) ( setq use-package-always-ensure t ) ( setq warning-minimum-level :emergency ) "" ) ) ) ( unless (assoc-default "gnu" package-archives ) (add-to-list 'package-archives ' ( "gnu". "" ) t ) ) ( unless (assoc-default "marmalade" package-archives ) (add-to-list 'package-archives ' ( "marmalade". "" ) t ) ) ( unless (assoc-default "org" package-archives ) (add-to-list 'package-archives ' ( "org". ( require ' package ) ( setq package-enable-at-startup nil ) Add useful package repo ( unless (assoc-default "melpa" package-archives ) (add-to-list 'package-archives ' ( "melpa".
0 kommentar(er)
