                                           (org-show-subtree)))))
 
 
-(use-package cl :commands (flet))
-
+(use-package cl
+  :commands (cl-flet))
 ;; Ignore running processes when closing Emacs
 ;; From http://oremacs.com/2015/01/04/dired-nohup
 (defadvice save-buffers-kill-emacs
     (around no-query-kill-emacs activate)
   "Prevent \"Active processes exist\" query on exit."
-  (flet ((process-list ())) ad-do-it))
+  (cl-flet ((process-list ())) ad-do-it))
 
 (defun ar/build-org-link ()
   "Build an org link, prompting for url and description."

    (term-send-string
     proc
     (concat "cd ~/Downloads && youtube-dl " url "\n"))))

;; Try to guess the target directory for operations.
(setq dired-dwim-target t)

(defun ar/view-clipboard-buffer ()
  "View clipboard buffer."

      _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)

