General cleanup & refactor; update TODO

This commit is contained in:
Henrik Lissner 2017-05-19 17:21:52 +02:00
parent d52ee9c3be
commit 656452df00
8 changed files with 36 additions and 36 deletions

View file

@ -89,7 +89,7 @@
+ [ ] twitter + [ ] twitter
+ [ ] present + [ ] present
** 2.0.3 [27/54] ** 2.0.3 [29/56]
+ [ ] bin/org-alert: scans TODOs in org files and issues system alerts + [ ] bin/org-alert: scans TODOs in org files and issues system alerts
+ [ ] Get rid of ~def-bootstrap~ and ~doom-bootstrap~; it's a clumsy system + [ ] Get rid of ~def-bootstrap~ and ~doom-bootstrap~; it's a clumsy system
+ [ ] tools/upload: add ~+upload/open-remote-file~ command to open current file + [ ] tools/upload: add ~+upload/open-remote-file~ command to open current file
@ -100,7 +100,7 @@
+ [ ] Write ~describe-setting~ for ~def-setting!~ definitions. + [ ] Write ~describe-setting~ for ~def-setting!~ definitions.
+ [ ] Fix invisible buffer-info segment in modeline for terminal Emacs + [ ] Fix invisible buffer-info segment in modeline for terminal Emacs
+ [ ] ui/doom-modeline: fix ~0/0~ display in modeline (leftover anzu state) + [ ] ui/doom-modeline: fix ~0/0~ display in modeline (leftover anzu state)
+ [1/7] lang/org + [3/9] lang/org
+ [ ] drag-drop image attachment (org-download) and central storage + [ ] drag-drop image attachment (org-download) and central storage
+ [ ] unified export system + [ ] unified export system
+ [ ] better shackle + org-agenda integration + [ ] better shackle + org-agenda integration
@ -108,6 +108,8 @@
+ [-] fix janky cursor positioning when manipulating org-table cells + [-] fix janky cursor positioning when manipulating org-table cells
+ [-] certain characters/keys--when typed in a table--cause the cell + [-] certain characters/keys--when typed in a table--cause the cell
to shrink (likely cause: smartparens pairs & custom SPC/BKSPC binds) to shrink (likely cause: smartparens pairs & custom SPC/BKSPC binds)
+ [X] Fix M-RET in plain lists not preserving indent level for new items
+ [X] don't move cursor when toggling folds
+ [X] don't move cursor when realigning org tables + [X] don't move cursor when realigning org tables
+ [1/13] New module :: tools/regex (PCRE IDE) + [1/13] New module :: tools/regex (PCRE IDE)
+ [X] perl backend + [X] perl backend

View file

@ -2,7 +2,7 @@
;;;###autoload ;;;###autoload
(defun doom/toggle-fullscreen () (defun doom/toggle-fullscreen ()
"Toggle fullscreen Emacs." "Toggle fullscreen Emacs (non-native on MacOS)."
(interactive) (interactive)
(set-frame-parameter (set-frame-parameter
nil 'fullscreen nil 'fullscreen

View file

@ -257,15 +257,14 @@ properties."
(after! eshell (after! eshell
;; When eshell runs a visual command (see `eshell-visual-commands'), it spawns
;; a term buffer to run it in, but where it spawns it is the problem.
;; By tying buffer life to its process, we ensure that we land back in the ;; By tying buffer life to its process, we ensure that we land back in the
;; eshell buffer after term dies. May cause problems with short-lived ;; eshell buffer after term dies. May cause problems with short-lived
;; processes. ;; processes.
;; FIXME replace with a 'kill buffer' keybinding. ;; FIXME replace with a 'kill buffer' keybinding.
(setq eshell-destroy-buffer-when-process-dies t) (setq eshell-destroy-buffer-when-process-dies t)
;; When eshell runs a visual command (see `eshell-visual-commands'), it spawns
;; a term buffer to run it in, but where it spawns it is the problem...
(defun doom*eshell-undedicate-popup (orig-fn &rest args) (defun doom*eshell-undedicate-popup (orig-fn &rest args)
"Force spawned term buffer to share with the eshell popup (if necessary)." "Force spawned term buffer to share with the eshell popup (if necessary)."
(when (doom-popup-p) (when (doom-popup-p)

View file

@ -5,12 +5,14 @@
x-alt-keysym 'meta) x-alt-keysym 'meta)
(defmacro find-file-in! (path &optional project-p) (defmacro find-file-in! (path &optional project-p)
"Returns an interactive function for searching files" "Returns an interactive function for searching files."
`(lambda () (interactive) `(lambda () (interactive)
(let ((default-directory ,path)) (let ((default-directory ,path))
(call-interactively (call-interactively
',(command-remapping ',(command-remapping
(if project-p 'projectile-find-file) 'find-file))))) (if project-p
#'projectile-find-file
#'find-file))))))
(map! (map!
[remap evil-jump-to-tag] #'projectile-find-tag [remap evil-jump-to-tag] #'projectile-find-tag
@ -76,27 +78,27 @@
:m ";" 'evil-ex :m ";" 'evil-ex
(:leader (:leader
;; Most commonly used ;; Most commonly used
:desc "Switch project buffer" :n "," #'persp-switch-to-buffer :desc "Switch project buffer" :n "," #'persp-switch-to-buffer
:desc "Switch buffer" :n "<" #'switch-to-buffer :desc "Switch buffer" :n "<" #'switch-to-buffer
:desc "Browse files" :n "." #'find-file :desc "Browse files" :n "." #'find-file
:desc "Find file from here" :n ">" #'counsel-file-jump :desc "Find file from here" :n ">" #'counsel-file-jump
:desc "Find file in project" :n "/" #'projectile-find-file :desc "Find file in project" :n "/" #'projectile-find-file
:desc "Find in file (swiper)" :n "?" #'swiper :desc "Find in file (swiper)" :n "?" #'swiper
:desc "Imenu" :n ";" #'imenu :desc "Imenu" :n ";" #'imenu
:desc "Imenu across buffers" :n ":" #'imenu-anywhere :desc "Imenu across buffers" :n ":" #'imenu-anywhere
:desc "Find other file" :n "a" #'projectile-find-other-file :desc "Find other file" :n "a" #'projectile-find-other-file
:desc "Jump to bookmark" :n "b" #'bookmark-jump :desc "Jump to bookmark" :n "b" #'bookmark-jump
:desc "Delete bookmark" :n "B" #'bookmark-delete :desc "Delete bookmark" :n "B" #'bookmark-delete
:desc "List errors" :n "e" #'flycheck-list-errors :desc "List errors" :n "e" #'flycheck-list-errors
:desc "View Emacs Log" :n "m" #'doom/popup-toggle-messages :desc "View Emacs Log" :n "m" #'doom/popup-toggle-messages
:desc "Recent files" :n "r" #'recentf :desc "Recent files" :n "r" #'recentf
:desc "Recent project files" :n "R" #'projectile-recentf :desc "Recent project files" :n "R" #'projectile-recentf
:desc "Insert from kill ring" :n "y" #'counsel-yank-pop :desc "Insert from kill ring" :n "y" #'counsel-yank-pop
:desc "Switch project" :n "p" #'projectile-switch-project :desc "Switch project" :n "p" #'projectile-switch-project
:desc "Open Neotree" :n "\\" #'+evil/neotree :desc "Open Neotree" :n "\\" #'+evil/neotree
;; Since I've remapped C-h... ;; Since I've remapped C-h...
:desc "help" :n "h" #'help-command :desc "help" :n "h" #'help-command
(:desc "quit" (:desc "quit"
:prefix "q" :prefix "q"
@ -303,7 +305,7 @@
;; rotate-text ;; rotate-text
:n "!" #'rotate-text :n "!" #'rotate-text
;; hide-show/evil-matchit ;; hide-show/evil-matchit
:nv "<tab>" #'+evil/matchit-or-toggle-fold :nv [tab] #'+evil/matchit-or-toggle-fold
;; help-mode ;; help-mode
(:map help-mode-map (:map help-mode-map

View file

@ -12,7 +12,7 @@ private/hlissner/snippets."
(defun +hlissner/C-u-M-x () (defun +hlissner/C-u-M-x ()
"Invokes `execute-extended-command' with the universal argument." "Invokes `execute-extended-command' with the universal argument."
(interactive) (interactive)
(let ((current-prefix-arg 1)) (let ((current-prefix-arg 4))
(call-interactively #'execute-extended-command))) (call-interactively #'execute-extended-command)))
(defmacro +hlissner-def-finder! (name dir) (defmacro +hlissner-def-finder! (name dir)

View file

@ -34,7 +34,7 @@
;; anzu and evil-anzu make it possible to display current/total in the ;; anzu and evil-anzu make it possible to display current/total in the
;; mode-line. ;; mode-line.
(def-package! evil-anzu (def-package! evil-anzu
:when (featurep! :feature evil) :when (featurep 'evil)
:init :init
(add-transient-hook! evil-ex-start-search (require 'evil-anzu)) (add-transient-hook! evil-ex-start-search (require 'evil-anzu))
:config :config

View file

@ -3,8 +3,6 @@
;;; These are the invisible dependencies ;;; These are the invisible dependencies
;; Required ;; Required
;;(require 'f)
;;(require 's)
;;(require 'evil) ;;(require 'evil)
;;(require 'projectile) ;;(require 'projectile)
;;(require 'all-the-icons) ;;(require 'all-the-icons)
@ -12,7 +10,6 @@
;; Optional ;; Optional
;;(require 'flycheck) ;;(require 'flycheck)
;;(require 'anzu) ;;(require 'anzu)
;;(require 'evil-anzu)
;;(require 'iedit) ;;(require 'iedit)
;;(require 'evil-multiedit) ;;(require 'evil-multiedit)

View file

@ -126,7 +126,7 @@
(advice-add #'recenter :around #'doom*blink-cursor-maybe) (advice-add #'recenter :around #'doom*blink-cursor-maybe)
(after! evil (after! evil
(advice-add #'evil-window-top :after #'doom/blink-cursor) (advice-add #'evil-window-top :after #'doom/blink-cursor)
(advice-add #'evil-window-middle :after #'doom/blink-cursor) (advice-add #'evil-window-middle :after #'doom/blink-cursor)
(advice-add #'evil-window-bottom :after #'doom/blink-cursor))) (advice-add #'evil-window-bottom :after #'doom/blink-cursor)))
@ -140,7 +140,7 @@
"Face to hightlight `hideshow' overlays." "Face to hightlight `hideshow' overlays."
:group 'doom) :group 'doom)
;; Nicer code-folding overlays ;; Nicer code-folding overlays (with fringe indicators)
(setq hs-set-up-overlay (setq hs-set-up-overlay
(lambda (ov) (lambda (ov)
(when (eq 'code (overlay-get ov 'hs)) (when (eq 'code (overlay-get ov 'hs))
@ -159,7 +159,7 @@
(after! flycheck (after! flycheck
;; because git-gutter is in the left fringe ;; because git-gutter is in the left fringe
(setq flycheck-indication-mode 'right-fringe) (setq flycheck-indication-mode 'right-fringe)
;; A non-descript, left-pointing arrow
(define-fringe-bitmap 'flycheck-fringe-bitmap-double-arrow (define-fringe-bitmap 'flycheck-fringe-bitmap-double-arrow
[0 0 0 0 0 4 12 28 60 124 252 124 60 28 12 4 0 0 0 0])) [0 0 0 0 0 4 12 28 60 124 252 124 60 28 12 4 0 0 0 0]))