General cleanup: reorganising snippets, tidying if statements, documenting functions
This commit is contained in:
parent
18c64c71c4
commit
4aa4de17f5
30 changed files with 128 additions and 99 deletions
|
@ -1,5 +1,6 @@
|
|||
(defun periodise ()
|
||||
(setq periodfile "~/Documents/drive/org/period.org")
|
||||
"Return day of menstrual cycle"
|
||||
(setq periodfile "~/Documents/drive/admin/emacs/period.org")
|
||||
(find-file-noselect periodfile)
|
||||
(setq thebuffer (file-name-nondirectory periodfile))
|
||||
(with-current-buffer thebuffer
|
||||
|
@ -17,8 +18,9 @@
|
|||
(insert (concat "Day " (format "%S" days))))
|
||||
|
||||
(defun menstruate ()
|
||||
"Mark beginning of menstrual cycle"
|
||||
(interactive)
|
||||
(setq periodfile "~/Documents/drive/org/period.org")
|
||||
(setq periodfile "~/Documents/drive/admin/emacs/period.org")
|
||||
(find-file-noselect periodfile)
|
||||
(setq thebuffer (file-name-nondirectory periodfile))
|
||||
(with-current-buffer thebuffer
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue