mirror of
https://github.com/pestctrl/emacs-config.git
synced 2026-02-16 08:14:15 +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"]
|
||||
path = submodule/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)
|
||||
(unless current-prefix-arg
|
||||
;; Check for older review
|
||||
(when (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? "))
|
||||
(shell-command "mv ~/.emacs.d/review-incomplete.el ~/.emacs.d/last-review.el"))
|
||||
(if (and (file-exists-p "~/.emacs.d/review-incomplete.el")
|
||||
(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-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
|
||||
(let* ((date (org-read-date nil nil (get-last-review-date)))
|
||||
(week (format "%02d"
|
||||
|
|
|
|||
1
submodule/conceal
Submodule
1
submodule/conceal
Submodule
|
|
@ -0,0 +1 @@
|
|||
Subproject commit 51d9c3ba5f4fd50dc3c81d9a581dea4f5d7daab8
|
||||
Loading…
Reference in a new issue