;;; -*- lexical-binding: t -*- ;; ;; this file: ;; https://dataswamp.org/~incal/emacs-init/w3m/w3m-version.el (require 'w3m) (defun emacs-w3m-version (&optional here) "Version number of this version of Emacs-w3m, `emacs-w3m-version'. If optional argument HERE is non-nil, insert string at point. \nThis is not the version of the shell tool w3m; see `w3m-version'." (interactive "P") (let ((ver (format "Emacs-w3m %s" emacs-w3m-version))) (if here (insert ver) (message ver) ))) (defun w3m-version (&optional here) "Version number of this version of w3m, `w3m-version'. If optional argument HERE is non-nil, insert string at point. \nThis is not the version of the Emacs browser; see `emacs-w3m-version'." (interactive "P") (if here (insert (message w3m-version)) (message w3m-version) )) (provide 'w3m-version)