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

(use-package hungry-delete :ensure t)
(global-hungry-delete-mode)
(global-font-lock-mode)

(global-auto-revert-mode)

;; Auto refresh dired.

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

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