update packages

lisp/avy.el

@@ -4,8 +4,8 @@
 
 ;; Author: Oleh Krehel <ohwoeowho@gmail.com>
 ;; URL: https://github.com/abo-abo/avy
-;; Package-Version: 20200624.1148
-;; Package-Commit: bbf1e7339eba06784dfe86643bb0fbddf5bb0342
+;; Package-Version: 20201226.1734
+;; Package-Commit: e92cb37457b43336b765630dbfbea8ba4be601fa
 ;; Version: 0.5.0
 ;; Package-Requires: ((emacs "24.1") (cl-lib "0.5"))
 ;; Keywords: point, location
@@ -2178,6 +2178,22 @@ The window scope is determined by `avy-all-windows' (ARG negates it)."
             (select-window window)
             (goto-char (car res))))
       (error
+       (set-mark-command 4)))))
+
+;;;###autoload
+(defun avy-transpose-lines-in-region ()
+  "Transpose lines in the active region."
+  (interactive)
+  (when (and (use-region-p) (> (count-lines (region-beginning) (region-end)) 1))
+    (let ((avy-all-windows nil)
+          (fst-line-point (avy--line nil (region-beginning) (region-end))))
+      (when fst-line-point
+        (let ((snd-line-point (avy--line nil (region-beginning) (region-end))))
+          (when snd-line-point
+            (save-mark-and-excursion
+              (push-mark fst-line-point)
+              (goto-char snd-line-point)
+              (transpose-lines 0))
             (avy-transpose-lines-in-region)))))))
 
 ;; ** Org-mode