mikael.capelle/unix-conf
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

[emacs] Modification for emacs.

Browse Source
This commit is contained in:
Mikaël Capelle 2020-01-10 15:07:59 +01:00
parent b103ec8cb7
commit 3fc7b413b7
2 changed files with 14 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
.emacs.d/elisp/init-dashboard.el
View File

@ -47,34 +47,33 @@
(dashboard-startup-banner (dashboard-startup-banner
(expand-file-name "images/KEC_Dark_BK_Small.png" user-emacs-directory)) (expand-file-name "images/KEC_Dark_BK_Small.png" user-emacs-directory))
(dashboard-items '((recents . 7) (dashboard-items '((recents . 7)
(bookmarks . 7) (bookmarks . 7)
(agenda . 5))) (agenda . 5)))
(dashboard-set-heading-icons t) (dashboard-set-heading-icons t)
(dashboard-set-navigator t) (dashboard-set-navigator t)
(initial-buffer-choice (lambda () (get-buffer dashboard-buffer-name)))
(dashboard-navigator-buttons (dashboard-navigator-buttons
(if (featurep 'all-the-icons) (if (featurep 'all-the-icons)
`(((,(all-the-icons-octicon "mark-github" :height 1.1 :v-adjust -0.05) `(((,(all-the-icons-octicon "mark-github" :height 1.1 :v-adjust -0.05)
"M-EMACS" "Browse M-EMACS Homepage" "M-EMACS" "Browse M-EMACS Homepage"
(lambda (&rest _) (browse-url "https://github.com/MatthewZMD/.emacs.d"))) (lambda (&rest _) (browse-url "https://github.com/MatthewZMD/.emacs.d")))
(,(all-the-icons-fileicon "elisp" :height 1.0 :v-adjust -0.1) (,(all-the-icons-fileicon "elisp" :height 1.0 :v-adjust -0.1)
"Configuration" "" (lambda (&rest _) (edit-configs))))) "Configuration" "" (lambda (&rest _) (edit-configs)))))
`((("" "M-EMACS" "Browse M-EMACS Homepage" `((("" "M-EMACS" "Browse M-EMACS Homepage"
(lambda (&rest _) (browse-url "https://github.com/MatthewZMD/.emacs.d"))) (lambda (&rest _) (browse-url "https://github.com/MatthewZMD/.emacs.d")))
("" "Configuration" "" (lambda (&rest _) (edit-configs))))))) ("" "Configuration" "" (lambda (&rest _) (edit-configs)))))))
:custom-face :custom-face
(dashboard-banner-logo-title ((t (:family "Love LetterTW" :height 123)))) (dashboard-banner-logo-title ((t (:family "Love LetterTW" :height 123))))
:config :config
(if (< (length command-line-args) 2)
(initial-buffer-choice (lambda () (get-buffer dashboard-buffer-name))))
(dashboard-modify-heading-icons '((recents . "file-text") (dashboard-modify-heading-icons '((recents . "file-text")
(bookmarks . "book"))) (bookmarks . "book")))
(dashboard-setup-startup-hook) (dashboard-setup-startup-hook)
;; Open Dashboard function ;; Open Dashboard function
(defun open-dashboard () (defun open-dashboard ()
"Open the *dashboard* buffer and jump to the first widget." "Open the *dashboard* buffer and jump to the first widget."
(interactive) (interactive)
(if (get-buffer dashboard-buffer-name) (if (get-buffer dashboard-buffer-name)
(kill-buffer dashboard-buffer-name)) (kill-buffer dashboard-buffer-name))
(dashboard-insert-startupify-lists) (dashboard-insert-startupify-lists)
(switch-to-buffer dashboard-buffer-name) (switch-to-buffer dashboard-buffer-name)
(goto-char (point-min)) (goto-char (point-min))

5
.emacs.d/elisp/init-python.el
View File

@ -79,8 +79,9 @@
(add-hook 'python-mode-hook 'hs-minor-mode) (add-hook 'python-mode-hook 'hs-minor-mode)
(use-package ein (use-package ein
:init :custom
(setq ein:polymode t) (ein:polymode t)
(ein:use-auto-complete t)
:commands (ein:notebooklist-open)) :commands (ein:notebooklist-open))
;; LSPPythonPac ;; LSPPythonPac