mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-06-14 12:21:20 +00:00
Use actual emacs functions for these
This commit is contained in:
parent
f87fbcaa72
commit
6c07c5c198
3 changed files with 9 additions and 3 deletions
3
.gitmodules
vendored
3
.gitmodules
vendored
|
|
@ -73,3 +73,6 @@
|
||||||
[submodule "submodule/elgantt"]
|
[submodule "submodule/elgantt"]
|
||||||
path = submodule/elgantt
|
path = submodule/elgantt
|
||||||
url = https://github.com/legalnonsense/elgantt/
|
url = https://github.com/legalnonsense/elgantt/
|
||||||
|
[submodule "submodule/conceal"]
|
||||||
|
path = submodule/conceal
|
||||||
|
url = https://github.com/lepisma/conceal
|
||||||
|
|
|
||||||
|
|
@ -68,9 +68,11 @@
|
||||||
(outline-next-heading)
|
(outline-next-heading)
|
||||||
(unless current-prefix-arg
|
(unless current-prefix-arg
|
||||||
;; Check for older review
|
;; Check for older review
|
||||||
(when (and (file-exists-p "~/.emacs.d/review-incomplete.el")
|
(if (and (file-exists-p "~/.emacs.d/review-incomplete.el")
|
||||||
(y-or-n-p "Woah, we found an incomplete review. Would you like to use that date as the start date? "))
|
(y-or-n-p (format "Woah, we found an incomplete review: %s. Would you like to use that date as the start date? "
|
||||||
(shell-command "mv ~/.emacs.d/review-incomplete.el ~/.emacs.d/last-review.el"))
|
(shell-command-to-string "cat ~/.emacs.d/review-incomplete.el | tr -d '\n'"))))
|
||||||
|
(rename-file "~/.emacs.d/review-incomplete.el" "~/.emacs.d/last-review.el" t)
|
||||||
|
(delete-file "~/.emacs.d/review-incomplete.el"))
|
||||||
;; Setup current review
|
;; Setup current review
|
||||||
(let* ((date (org-read-date nil nil (get-last-review-date)))
|
(let* ((date (org-read-date nil nil (get-last-review-date)))
|
||||||
(week (format "%02d"
|
(week (format "%02d"
|
||||||
|
|
|
||||||
1
submodule/conceal
Submodule
1
submodule/conceal
Submodule
|
|
@ -0,0 +1 @@
|
||||||
|
Subproject commit 51d9c3ba5f4fd50dc3c81d9a581dea4f5d7daab8
|
||||||
Loading…
Reference in a new issue