diff --git a/sync-music/actions.lisp b/sync-music/actions.lisp
index 2adb9c4..0109337 100644
--- a/sync-music/actions.lisp
+++ b/sync-music/actions.lisp
@@ -79,6 +79,6 @@ Pushes status message about this action to QUEUE if given."))
 (defmethod action-perform-describe ((a directory-action))
   (format nil "Ensuring `~A` exists..." (action-target a)))
 
-;; NOTE: delete actions are equal to copy actions to the same target
+;; NOTE: Delete actions are equal to copy actions to the same target
 (defmethod fset:compare ((a1 action) (a2 action))
   (fset:compare-slots a1 a2 #'action-target))
diff --git a/sync-music/sync-music.lisp b/sync-music/sync-music.lisp
index 644e3ef..663bdb4 100644
--- a/sync-music/sync-music.lisp
+++ b/sync-music/sync-music.lisp
@@ -91,7 +91,7 @@ total task count as arguments."
 
 (defun clean-directory (target)
   "Delete all empty folders and folders containing only empty folders in TARGET."
-  ;; NOTE: want (every #'clean-directory ...) but without short-circuiting
+  ;; NOTE: Want (every #'clean-directory ...) but without short-circuiting
   (and (every #'identity
               (mapcar #'clean-directory (uiop:subdirectories target)))
        (null (uiop:directory-files target))