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-ui.el

@@ -120,14 +120,15 @@
 (column-number-mode t)
 
 ;; 显示时间
-(setq display-time-default-load-average nil
-      display-time-string-forms
-      '((propertize
-	 (concat
-	  (propertize (format-time-string " %H:%M") 'face 'display-time-date-and-time)
-	  (propertize (format-time-string "-%p") 'face 'font-lock-comment-face))
-	 'help-echo (format-time-string "%A, %B %d, %Y"))))
-(display-time-mode)
+(unless (or *is-linux* *is-android*)
+  (setq display-time-default-load-average nil
+	display-time-string-forms
+	'((propertize
+	   (concat
+	    (propertize (format-time-string " %H:%M") 'face 'display-time-date-and-time)
+	    (propertize (format-time-string "-%p") 'face 'font-lock-comment-face))
+	   'help-echo (format-time-string "%A, %B %d, %Y"))))
+  (display-time-mode))
 
 ;; 添加个人字体到 cnfonts
 (setq cnfonts-personal-fontnames