(erc-version-string): Don't hard-code Emacs version.

(erc-version): Use emacs-version.

(erc-version-string): Don't hard-code Emacs version.
(erc-version): Use emacs-version.
67e53305 · Eli Zaretskii · 6222ac34 · 67e53305
Commit 67e53305 authored Feb 03, 2006 by Eli Zaretskii
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

lisp/erc/erc.el lisp/erc/erc.el +2 -2

No files found.
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -66,7 +66,7 @@

 ;;; Code:

-(defconst erc-version-string "Version 5.1 (Emacs 22)"
+(defconst erc-version-string "Version 5.1"
  "ERC version.  This is used by function `erc-version'.")

 (eval-when-compile (require 'cl))
@@ -5774,7 +5774,7 @@ P may be an integer or a service name."
 If optional argument HERE is non-nil, insert version number at point."
  (interactive "P")
  (let ((version-string
-	 (format "ERC %s" erc-version-string)))
+	 (format "ERC %s (GNU Emacs %s)" erc-version-string emacs-version)))
    (if here
 	(insert version-string)
      (if (interactive-p)