LINUX.ORG.RU

История изменений

Исправление Zubok, (текущая версия) :

Если я правильно понимаю то, что ты хочешь, то это вшитое поведение и специальных ручек, которыми можно покрутить это место, нет. По крайней мере, в Emacs 24 так. Это поведение вшито в код, поэтому тут только лиспить придется. Вот это место в org.el в функции org-todo:

(defun org-todo (&optional arg)

...

	      (when (and now-done-p org-log-done)
		;; It is now done, and it was not done before
		(org-add-planning-info 'closed (org-current-effective-time))
		(if (and (not dolog) (eq 'note org-log-done))
		    (org-add-log-setup 'done org-state this 'findpos 'note)))

...

Как видно, org-current-effective-time вставляется безусловно и жестко. Если я ничего не упустил, то лиспить свою функцию придется.

Исходная версия Zubok, :

Если я правильно понимаб то, что ты хочешь, то это вшитое поведение и специальных ручек, которые можно покрутить это мето, нет. По крайней мере, в Emacs 24 так. Это поведение вшито в код, поэтому тут только лиспить придется. Вот это место в org.el в функции org-todo:

(defun org-todo (&optional arg)

...

	      (when (and now-done-p org-log-done)
		;; It is now done, and it was not done before
		(org-add-planning-info 'closed (org-current-effective-time))
		(if (and (not dolog) (eq 'note org-log-done))
		    (org-add-log-setup 'done org-state this 'findpos 'note)))

...

Как видно, org-current-effective-time вставляется безусловно и жестко. Если я ничего не упустил, то лиспить свою функцию придется.