move text or region

smart-shift-hydra.el

;; https://github.com/hbin/smart-shift
;; Another text moving package which works well.
;; Easily you can shift region or current line.

;; Usage 1: Go to line call the function move it with h,j,k,l
;; Usage 2: Select the region than move them via h,j,k,l


;; Known bug If you select via V command it behaves so weird.

(defhydra smart-shift-hydra (
                             ;; Overide predefined function in package
                             ;; It was offering arrow keys
                             ;; PS: I know it's not good place to define function but it works.
                             :pre (defun smart-shift-override-local-map ())
                             ;; Deactivates mark if it is active
                             ;; PS: It can be better function! so what?
                             :post evil-magit-maybe-deactivate-mark
                             ;; Pretty shortcut
                             global-map "C-x TAB"
                             :exit nil)
  ("h" smart-shift-left)
  ("j" smart-shift-down)
  ("k" smart-shift-up)
  ("l" smart-shift-right)
  ;; Exit
  ("RET" nil :exit t)
  ("q" nil :exit t))