   :config (fullframe ibuffer ibuffer-quit))
 
 (use-package dired
-  :config (fullframe dired quit-window))
+  :config
+  (fullframe dired quit-window)
+  ;; Try to guess the target directory for operations.
+  (setq dired-dwim-target t))
 
 ;; Enhanced list-packages replacement.
 (use-package paradox :ensure t

            #'ar/after-prog-mode-text-change
            t t)
  (let ((m org-mode-map))
    (define-key m [f6] #'ar/export-blog-to-html))
  (setq show-trailing-whitespace t)
  (set-fill-column 1000)
  (ar/org-src-color-blocks-dark)

      _b_lock"
  ("l" ar/buffer-sort-lines-ignore-case nil)
  ("o" org-sort-list nil)
  ("b" ar/buffer-sort-current-block nil)
  ("q" nil nil :color blue))
(bind-key "M-s" #'hydra-sort/body)

