   ;;; Plugins
   (require 'org-download)
   (setq-default
-   org-download-image-dir ".attach"
+   org-download-image-dir (expand-file-name ".attach" org-directory)
    org-download-heading-lvl nil
    org-download-timestamp "_%Y%m%d_%H%M%S")
 
   (when IS-MAC
     (setq org-download-screenshot-method "screencapture -i %s"))
 
-  (defun org-download--dir-2 ()
-    (f-base (buffer-file-name)))
+  ;; Write download paths relative to current file
+  (defun org-download--dir-2 () nil)
+  (defun narf*org-download--fullname (path)
+    (f-relative path (f-dirname (buffer-file-name))))
+  (advice-add 'org-download--fullname :filter-return 'narf*org-download--fullname)
 
   ;;; Auto-completion
   (after! company

              (lambda ()
                (when (file-exists-p buffer-file-name)
                  (shut-up! (org-babel-lob-ingest buffer-file-name))))
              t t))

  (org-babel-do-load-languages
   'org-babel-load-languages


(defun narf@org-babel ()
  (setq org-confirm-babel-evaluate nil   ; you don't need my permission
        org-src-window-setup 'current-window
        org-src-fontify-natively t       ; make code pretty
        org-src-preserve-indentation t
        org-src-tab-acts-natively t)
