** Elscreen
Fix one elscreen issue when startup emacs https://github.com/knu/elscreen/issues/6
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
- (use-package elscreen
- :ensure t
- :init
- (setq elscreen-tab-display-control nil)
- :config
- ;; (elscreen-start)
- (set-face-attribute 'elscreen-tab-current-screen-face nil :foreground "black" :background "yellow")
- (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil)
- ;; (global-unset-key (kbd)); M-TAB switch screen
- ;; (global-set-key (kbd "s-`") '(lambda () (interactive) (elscreen-goto 0)))
- ;; (dotimes (i 8)
- ;; (global-set-key (kbd (concat "s-" (number-to-string (+ i 1))))
- ;; `(lambda () (interactive) (elscreen-goto ,(+ i 1)))))
- ;; (global-set-key (kbd "s-t") 'elscreen-create)
- ;; (global-set-key (kbd "s-n") 'elscreen-next)
- ;; (global-set-key (kbd "s-p") 'elscreen-previous)
- )
+ ;; (use-package elscreen
+ ;; :ensure t
+ ;; :init
+ ;; (setq elscreen-tab-display-control nil)
+ ;; :config
+ ;; ;; (elscreen-start)
+ ;; (set-face-attribute 'elscreen-tab-current-screen-face nil :foreground "black" :background "yellow")
+ ;; (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil)
+ ;; ;; (global-unset-key (kbd)); M-TAB switch screen
+ ;; ;; (global-set-key (kbd "s-`") '(lambda () (interactive) (elscreen-goto 0)))
+ ;; ;; (dotimes (i 8)
+ ;; ;; (global-set-key (kbd (concat "s-" (number-to-string (+ i 1))))
+ ;; ;; `(lambda () (interactive) (elscreen-goto ,(+ i 1)))))
+ ;; ;; (global-set-key (kbd "s-t") 'elscreen-create)
+ ;; ;; (global-set-key (kbd "s-n") 'elscreen-next)
+ ;; ;; (global-set-key (kbd "s-p") 'elscreen-previous)
+ ;; )
#+END_SRC
* Dired
("\\.md\\'" . markdown-mode)
("\\.markdown\\'" . markdown-mode))
:init (setq markdown-command "multimarkdown"))
+
+ (add-hook 'gfm-mode-hook (lambda ()
+ (set-face-attribute 'markdown-inline-code-face nil :inherit 'fixed-pitch)
+ (set-face-attribute 'markdown-pre-face nil :inherit 'fixed-pitch)))
+ (with-eval-after-load "gfm-mode"
+ (set-face-attribute 'markdown-inline-code-face nil :inherit 'fixed-pitch)
+ (set-face-attribute 'markdown-pre-face nil :inherit 'fixed-pitch))
#+END_SRC
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
(add-to-list 'projectile-globally-ignored-files "GTAGS")
(projectile-global-mode t))
- (use-package persp-projectile
- :ensure t
- :config
- (persp-mode)
- :bind
- ;; (:map projectile-mode-map
- ;; ("s-t" . projectile-persp-switch-project))
- )
+ ;; (use-package persp-projectile
+ ;; :ensure t
+ ;; :config
+ ;; (persp-mode)
+ ;; :bind
+ ;; ;; (:map projectile-mode-map
+ ;; ;; ("s-t" . projectile-persp-switch-project))
+ ;; )
;; change default-directory of scratch buffer to projectile-project-root
(defun sd/project-switch-action ()
(define-key perspeen-mode-map (kbd "s-n") 'perspeen-next-ws)
(define-key perspeen-mode-map (kbd "s-p") 'perspeen-previous-ws)
(define-key perspeen-mode-map (kbd "s-'") 'perspeen-last-ws)
+ (define-key perspeen-mode-map (kbd "s-t") 'perspeen-tab-create-tab)
(define-key perspeen-mode-map (kbd "s-t") 'perspeen-tab-create-tab))
#+END_SRC
* TODO todolist