elisp: clean up indentation

1 files changed, 4 insertions, 6 deletions

diff --git a/emacs/lisp/fcuny-org-custom.el b/emacs/lisp/fcuny-org-custom.el
index d1b30cd..8992f2d 100644
--- a/emacs/lisp/fcuny-org-custom.el
+++ b/emacs/lisp/fcuny-org-custom.el
@@ -5,7 +5,7 @@
    (calendar-gregorian-from-absolute (org-today))
    'subtree-at-point))
 
-(defun org-refile-to-datetree (&optional file)
+(defun fcuny/org-refile-to-datetree (&optional file)
   "Refile a subtree to a datetree corresponding to it's timestamp.
 The current time is used if the entry has no timestamp. If FILE
 is nil, refile in the current file. A datetree within a subheading
@@ -13,13 +13,12 @@ is possible if the heading has a property of DATE_TREE."
   (interactive "f")
   (let* ((datetree-date (or (org-entry-get nil "TIMESTAMP" t)
                             (org-read-date t nil "now")))
-         (date (org-date-to-gregorian datetree-date))
-         )
+         (date (org-date-to-gregorian datetree-date)))
     (save-excursion
       (with-current-buffer (current-buffer)
         (org-cut-subtree)
         (if file (find-file file))
-	(widen)
+	    (widen)
         (org-datetree-find-date-create date)
         (org-narrow-to-subtree)
         (show-subtree)
@@ -27,7 +26,6 @@ is possible if the heading has a property of DATE_TREE."
         (newline)
         (goto-char (point-max))
         (org-paste-subtree (+ org-datetree-base-level 3))
-        (widen)
-        ))))
+        (widen)))))
 
 (provide 'fcuny-org-custom)