Org-mode config is back baby! With a vengeance!
This commit is contained in:
parent
6851951aaf
commit
477ef168d4
19 changed files with 1227 additions and 309 deletions
|
@ -68,6 +68,7 @@
|
|||
(Man-mode . emacs)
|
||||
(grep-mode . emacs)
|
||||
(image-mode . normal)
|
||||
(doc-view-mode . normal)
|
||||
))
|
||||
(evil-set-initial-state `,(car mode-map) `,(cdr mode-map)))
|
||||
|
||||
|
|
|
@ -19,6 +19,12 @@
|
|||
("/Dockerfile$" "__" dockerfile-mode)
|
||||
("/docker-compose.yml$" "__" yaml-mode)
|
||||
|
||||
;; Org-mode
|
||||
("\\.org$" "__" org-mode)
|
||||
("/Work/.+\\.org$" "__project.org" org-mode)
|
||||
("/Invoices/.+\\.org$" "__invoice.org" org-mode)
|
||||
("/Contacts/.+\\.org$" "__contact.org" org-mode)
|
||||
|
||||
;; C/C++
|
||||
("/Makefile$" "__" makefile-gmake-mode)
|
||||
("/main\\.\\(cc\\|cpp\\)$" "__main.cpp" c++-mode)
|
||||
|
|
|
@ -98,10 +98,10 @@
|
|||
(narf:send-to-tmux (format "cd %s" (shell-quote-argument default-directory)))
|
||||
(narf-switch-to-iterm))
|
||||
|
||||
(defun narf-org-init-for-osx ()
|
||||
;; Reveal files in finder
|
||||
(setq org-file-apps '(("\\.org$" . emacs)
|
||||
(t . "open -R \"%s\""))))
|
||||
;; Open with external programs
|
||||
(require 'openwith)
|
||||
(openwith-mode t)
|
||||
(setq openwith-associations '(("\\.\\(pdf\\|jpe?g\\|gif\\|docx?\\|pptx?\\|xlsx?\\|zip\\|tar\\(\\.gz\\)?\\|rar\\)$" "open" (file))))
|
||||
|
||||
(provide 'core-os-osx)
|
||||
;;; core-os-osx.el ends here
|
||||
|
|
|
@ -114,6 +114,14 @@
|
|||
(after! projectile
|
||||
(setq projectile-switch-project-action 'neotree-projectile-action))
|
||||
|
||||
;; Shorter file names for org files
|
||||
(defun narf*neo-path--file-short-name (orig-fun &rest args)
|
||||
(let ((file (car args)))
|
||||
(if (f-ext? file "org")
|
||||
(s-replace "-" " " (f-base file))
|
||||
(apply orig-fun args))))
|
||||
(advice-add 'neo-path--file-short-name :around 'narf*neo-path--file-short-name)
|
||||
|
||||
;; A custom and simple theme for neotree
|
||||
(advice-add 'neo-buffer--insert-fold-symbol :override 'narf*neo-buffer-fold-symbol))
|
||||
|
||||
|
|
|
@ -66,6 +66,10 @@
|
|||
(set-fontset-font "fontset-default" `(,x . ,x)
|
||||
(font-spec :name "DejaVu Sans" :size 10) nil))
|
||||
'(?➊ ?➋ ?➌ ?➍ ?➎ ?❻ ?➐ ?➑ ?➒ ?➓ ?λ))
|
||||
(mapc (lambda (x)
|
||||
(set-fontset-font "fontset-default" `(,x . ,x)
|
||||
(font-spec :name "FontAwesome" :size 13) nil))
|
||||
'(? ? ? ? ? ? ? ? ?))
|
||||
|
||||
(blink-cursor-mode 1) ; do blink cursor
|
||||
(tooltip-mode -1) ; show tooltips in echo area
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue