ORG-MODE - TODO durumunu belirli bir tarihte mi tetiklersiniz?

Her sabah bir tickler dosyasını veya takvimi manuel olarak kontrol etmek yerine, bir öğenin durumunu belirli bir tarihte TODO'ya ayarlayacak bir tetikleyici nasıl oluşturabilirim?

Doğrudan bir cevap değil, ancak Org'ın desteğini son tarihler ve zamanlama için kullanabilirsiniz.

YAPILACAK öğelerinizi oluşturabilir ve onlara planlanmış bir tarih verebilirsiniz; bu, Kuruluş'ta görevi yapmayı planladığınız tarih - ve ne zaman gündeminizde görünmeye başlaması gerektiği anlamına gelir. (Halihazırda kuruluş gündemi görünümlerini kullanmıyorsanız biraz araştırmaya değer!)

İhtiyaçlarınıza bağlı olarak bir son tarih de atayabilirsiniz. Örneğin: Cuma günü bir TODO oluşturun, gerçekten görmek istediğinizde aşağıdaki Çar için programlayın; ve bir sonraki Cuma günü tamamlaması gereken bir son tarih verin.

İşte her sabah tüm yapılacaklarımı taramak ve gecikmişse tarihi bugüne değiştirmek ve bir sonraki işlemden bugün gerçekleşecekse aktif hale getirmek için kullandığım bir şey. Bir yıldır kullandığım kendi takvimim için özel bir çözümdür, bu yüzden şüphesiz kendi parçanızda bazı özelleştirmelere ihtiyaç duyacaktır. Hatırladığım bir değişiklik olmasıdır org-deadlinegelen org-modesürüm 7 ve 8 ve benim kurulumunda önceki bir sürümünü kullanıyor olabilirsiniz. Mevcut sürümün ek bir argümana veya başka bir şeye ihtiyacı olabilir - ek yardıma ihtiyacınız olursa, bana bildirin, zamanın izin verdiği ölçüde önümüzdeki birkaç gün boyunca üzerinde çalışacağım.

Kullandığım regex, başlıkların iki yıldızı olduğunu ve tamponun tam solunda olacağını düşünüyor. Kendi kurulumunuz büyük olasılıkla normal ifadenin değiştirilmesini gerektirecektir.

(defun org-carry-forward-uncompleted-tasks ()
"Carry forward uncompleted tasks."
(interactive)
  (save-excursion
    (goto-char (point-max))
    (while (re-search-backward "^\\*\\* Active" nil t)
      (unless (org-at-heading-p)
        (org-back-to-heading t))
      (let* (
          (element (org-element-at-point))
          (todo-state (org-element-property :todo-keyword element))
          (deadline (org-element-property :deadline element))
          (deadline-time-stamp
            (when deadline
              (time-to-days
                (org-time-string-to-time
                  (org-element-property :raw-value deadline)))))
          (today (time-to-days (current-time))) )
        (when
            (and
              deadline-time-stamp
              (> today deadline-time-stamp) ;; deadline is overdue
              (string= todo-state "Active") ) ;; todo-state equals "X"
          (org-deadline nil ".") )))))

(defun org-make-active-today ()
"Change task from Next Action to Active if deadline is less than or equal to today."
(interactive)
  (save-excursion
    (goto-char (point-max))
    (while (re-search-backward "^\\*\\* Next Action" nil t)
      (unless (org-at-heading-p)
        (org-back-to-heading t))
      (let* (
          (element (org-element-at-point))
          (todo-state (org-element-property :todo-keyword element))
          (deadline (org-element-property :deadline element))
          (deadline-time-stamp
            (when deadline
              (time-to-days
                (org-time-string-to-time
                  (org-element-property :raw-value deadline) ))))
          (today (time-to-days (current-time))) )
        (when
            (and
              deadline-time-stamp
              (>= today deadline-time-stamp) ;; deadline less than or equal to today
              (string= todo-state "Next Action")) ;; todo-state equals "X"
          (org-deadline nil ".")
          (org-todo "Active") )))))