;;; -*- lexical-binding: t -*- ;; ;; this file: ;; https://dataswamp.org/~incal/emacs-init/meta.el ;; ;; also see: ;; https://dataswamp.org/~incal/emacs-init/w3m/w3m-version.el ;; ;; example: ;; GNU Emacs 29.0.50 (build 1, x86_64-pc-linux-gnu, cairo version 1.16.0) ;; of 2022-05-22 [commit 714970f5967f2153bb95e35823dbd917e0e5b60b] (defun emacs-version-commit (&optional here) (interactive "P") (let ((ver (replace-regexp-in-string " \\(of\\)" "\\1" (format "%s [commit %s]" (emacs-version) (emacs-repository-get-version) )))) (when here (insert ver) ) (message ver) )) (defalias 'ever #'emacs-version-commit) (provide 'meta)