 (defun doom/copy-this-file (new-path &optional force-p)
   "Copy current buffer's file to NEW-PATH. If FORCE-P, overwrite the destination
 file if it exists, without confirmation."
-  (interactive "F")
+  (interactive
+   (list (read-file-name "Copy file to: ")
+         current-prefix-arg))
   (pcase (catch 'status
            (when-let* ((dest (doom--copy-file (buffer-file-name) new-path force-p)))
              (doom--update-file new-path)

;;;###autoload
(defun doom/sudo-find-file (file)
  "Open FILE as root."
  (interactive
   (list (read-file-name "Open as root: ")))
  (when (file-writable-p file)
    (user-error "File is user writeable, aborting sudo"))
  (find-file (if (file-remote-p file)

(defun doom/move-this-file (new-path &optional force-p)
  "Move current buffer's file to NEW-PATH. If FORCE-P, overwrite the destination
file if it exists, without confirmation."
  (interactive
   (list (read-file-name "Move file to: ")
         current-prefix-arg))
  (pcase (catch 'status
           (let ((old-path (buffer-file-name))
                 (new-path (expand-file-name new-path)))
