#+FILETAGS: @personal * أغنية التعيين :PROPERTIES: :ID: 48c9894f-1a08-4fb6-9495-bb4644a0f3c6 :CREATED: [2009-07-27 Mon 17:12] :MODIFIED: [2009-08-01 Sat 19:42] :IMPORTED: [2023-02-08 Wed 19:22] :END: مربوط على الدرجة الخامسة، و الناس درجات، و مرشح آخد السادسة، غير العلاوات. ما اعرفش لا كدا و لا كدا و لا أروح ببَّات pubs. #+begin_src elisp (defun my/org-move-entry-to-daily-notes () "Move the current org-mode headline to the daily notes file based on its :CREATED: property." (interactive) (let* ((created-prop (org-entry-get nil "CREATED")) (created-date (when created-prop (org-parse-time-string created-prop))) (year (nth 5 created-date)) ; Extract year (6th element) (month (nth 4 created-date)) ; Extract month (5th element) (day (nth 3 created-date)) ; Extract day (4th element) (target-date (format "%04d-%02d-%02d" year month day)) ; Format date string (target-file (org-roam-dailies-goto target-date)) ) (when target-file (org-cut-subtree) (find-file target-file) (goto-char (point-max)) (unless (bolp) (newline)) (org-paste-subtree) ) ) ) #+end_src #+begin_src elisp (let* ((created-date "2009-07-27") (org-roam-dailies-capture-date created-date) ) ) #+end_src