chore(config): Update Emacs configuration with ibuffer and perspective improvements

lisp/init-kbd-func.el

@@ -132,6 +132,36 @@ Disable jinx-mode if it's enable and global-jinx-mode is disable , otherwise tog
   (magit-section-up)
   (magit-section-toggle (magit-section-at)))
 
+(defun my-persp-remove-marked-ibuffers ()
+  "Remove marked buffers from perspective."
+  (interactive)
+  (let ((buffers (ibuffer-get-marked-buffers)))
+    (dolist (buf buffers)
+      (persp-remove-buffer buf))))
+
+(defun my-persp-add-marked-ibuffers (persp-name)
+  "Add marked buffers to perspective."
+  (interactive
+   (list (completing-read "Perspective: "
+                          (persp-names)
+                          nil nil)))
+  (let ((buffers (ibuffer-get-marked-buffers)))
+    (persp-switch persp-name)
+    (dolist (buf buffers)
+      (persp-add-buffer buf))))
+
+(defun my-persp-set-marked-ibuffers (persp-name)
+  "Set marked buffers to perspective."
+  (interactive
+   (list (completing-read "Perspective: "
+                          (persp-names)
+                          nil nil)))
+  (let ((buffers (ibuffer-get-marked-buffers)))
+    (persp-switch persp-name)
+    (dolist (buf buffers)
+      (persp-set-buffer buf))))
+
+
 (provide 'init-kbd-func)
 
 ;;; init-kbd-func.el ends here