add xe-tools emacs module

Signed-off-by: Xe <me@christine.website>

common/home-manager/emacs/default.nix

@@ -468,6 +468,15 @@ in {
             enable = true;
             mode = [ ''"\\.zig\\'"'' ];
           };
+
+          ## custom shit
+          xe-tools = {
+            enable = true;
+            package = (epkgs: epkgs.trivialBuild {
+              pname = "xe-tools";
+              src = ./xe-tools.el;
+            });
+          };
         };
       };
     };

common/home-manager/emacs/xe-tools.el

@@ -0,0 +1,8 @@
+(defun xe/count-buffers (&optional display-anyway)
+  "Display or return the number of buffers."
+  (interactive)
+  (let ((buf-count (length (buffer-list))))
+    (if (or (interactive-p) display-anyway)
+        (message "%d buffers in this Emacs" buf-count)) buf-count))
+
+(provide 'xe-tools)