feat: Add SLY Common Lisp support and refine EXWM configuration

- Add SLY package with custom keybindings and ibuffer groups Replace
- removed power commands with consolidated `my-desktop-init` Add
- Emacs key simulation for EXWM windows Enable mouse drag-and-drop
- for Dired Disable display-time on Linux/Android Rebind window
- resize to C-M-arrow keys

lisp/init-kbd-func.el

@@ -164,7 +164,31 @@ Disable jinx-mode if it's enable and global-jinx-mode is disable , otherwise tog
   "Run `consult-ripgrep' in current project's root."
   (interactive)
   (when-let* ((proj (project-current t)))
-      (consult-ripgrep (project-root proj))))
+    (consult-ripgrep (project-root proj))))
+
+(when *is-linux*
+  (defun reboot ()
+    "Execute loginctl reboot command."
+    (interactive)
+    (eshell-command "loginctl reboot"))
+
+  (defun poweroff ()
+    "Execute loginctl poweroff command"
+    (interactive)
+    (eshell-command "loginctl poweroff"))
+
+  (defun suspend ()
+    "Execute loginctl suspend command"
+    (interactive)
+    (eshell-command "loginctl suspend"))
+
+  (defun my-desktop-init ()
+    "Launch something for linux desktop."
+    (interactive)
+    (unless (zerop (shell-command "pgrep -x mihomo"))
+      (start-process-shell-command "mihomo" nil "mihomo -d ~/.config/mihomo/"))
+    (start-process-shell-command "xrandr-refresh" nil "xrandr --output DP-4 --mode 2560x1440 --rate 165.00")
+    (start-process-shell-command "xinput" nil "xinput set-prop 12 'libinput Accel Speed' -0.45")))
 
 (provide 'init-kbd-func)