drag-stuff for dragging selected regions

init.el

@@ -81,6 +81,7 @@
 (elpaca embark)                         ; Contextual actions
 (elpaca embark-consult)
 (elpaca wgrep)                          ; allow writeable grep buffers
+(elpaca drag-stuff)
 																				;(elpaca lsp-embark)
 (elpaca kirigami)                       ; folding meta utility
 (elpaca pcre2el)                        ; fix regex

packages/editing-packages.el

@@ -36,5 +36,15 @@
 								 (window-parameters (mode-line-format . none))))
 	)
 
+(use-package drag-stuff
+	:defer t
+	:bind
+	(("<M-up>" . drag-stuff-up)
+	 ("<M-down>" . drag-stuff-down)
+	 ("<M-left>"  . drag-stuff-left)
+	 ("<M-right>" . drag-stuff-right)
+	 )
+	)
+
 
 (provide 'editing-packages)