add xe-tools emacs module
Signed-off-by: Xe <me@christine.website>
This commit is contained in:
parent
5c06ae218a
commit
0c8ff8494e
|
@ -468,6 +468,15 @@ in {
|
||||||
enable = true;
|
enable = true;
|
||||||
mode = [ ''"\\.zig\\'"'' ];
|
mode = [ ''"\\.zig\\'"'' ];
|
||||||
};
|
};
|
||||||
|
|
||||||
|
## custom shit
|
||||||
|
xe-tools = {
|
||||||
|
enable = true;
|
||||||
|
package = (epkgs: epkgs.trivialBuild {
|
||||||
|
pname = "xe-tools";
|
||||||
|
src = ./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)
|
Loading…
Reference in New Issue