From d5019f0b57332e601ffb237715e061c871d3b626 Mon Sep 17 00:00:00 2001
From: Henrik Lissner <henrik@lissner.net>
Date: Tue, 2 Mar 2021 23:44:34 -0500
Subject: [PATCH] Add docstring to +org/refile* commands

---
 modules/lang/org/autoload/org-refile.el | 18 ++++++++++++------
 1 file changed, 12 insertions(+), 6 deletions(-)

diff --git a/modules/lang/org/autoload/org-refile.el b/modules/lang/org/autoload/org-refile.el
index c54483fe7..681b4b57a 100644
--- a/modules/lang/org/autoload/org-refile.el
+++ b/modules/lang/org/autoload/org-refile.el
@@ -4,7 +4,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-current-file (arg &optional file)
-  "TODO"
+  "Refile current heading to elsewhere in the current buffer.
+If prefix ARG, copy instead of move."
   (interactive "P")
   (let ((org-refile-targets `((,file :maxlevel . 10)))
         (org-refile-use-outline-path nil)
@@ -14,7 +15,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-file (arg file)
-  "Refile current heading to a particular org file."
+  "Refile current heading to a particular org file.
+If prefix ARG, copy instead of move."
   (interactive
    (list current-prefix-arg
          (read-file-name "Select file to refile to: "
@@ -26,7 +28,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-other-window (arg)
-  "TODO"
+  "Refile current heading to an org buffer visible in another window.
+If prefix ARG, copy instead of move."
   (interactive "P")
   (let ((org-refile-keep arg)
         org-refile-targets
@@ -42,7 +45,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-other-buffer (arg)
-  "TODO"
+  "Refile current heading to another, living org buffer.
+If prefix ARG, copy instead of move."
   (interactive "P")
   (let ((org-refile-keep arg)
         org-refile-targets
@@ -55,7 +59,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-running-clock (arg)
-  "TODO"
+  "Refile current heading to the currently clocked in task.
+If prefix ARG, copy instead of move."
   (interactive "P")
   (unless (bound-and-true-p org-clock-current-task)
     (user-error "No active clock to refile to"))
@@ -64,7 +69,8 @@
 
 ;;;###autoload
 (defun +org/refile-to-last-location (arg)
-  "TODO"
+  "Refile current heading to the last node you refiled to.
+If prefix ARG, copy instead of move."
   (interactive "P")
   (or (assoc (plist-get org-bookmark-names-plist :last-refile)
              bookmark-alist)