Hi Brett, Brett Viren <[email protected]> writes:
> (defun bv-daily-log-file ()
> (find-file (concat "~/org/web/notes/"
> (format-time-string "%Y-%m-%d") ".org"))
> (goto-char (point-max))
> (newline 2)
> )
You may try this (not tested myself):
(defun bv-daily-log-file ()
(save-window-excursion
(find-file (concat "~/org/web/notes/"
(format-time-string "%Y-%m-%d") ".org"))
(goto-char (point-max))
(newline 2)))
The trick is to use `save-window-excursion'.
--
Bastien
