diff options
-rw-r--r-- | lisp/erc/ChangeLog | 4 | ||||
-rw-r--r-- | lisp/erc/erc-lang.el | 8 |
2 files changed, 7 insertions, 5 deletions
diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index 1f27dbdb7f7..210f6985dc9 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog @@ -1,3 +1,7 @@ +2010-11-11 Glenn Morris <rgm@gnu.org> + + * erc-lang.el (erc-cmd-LANG): Fix what may have been a typo. + 2010-11-05 Lars Magne Ingebrigtsen <larsi@gnus.org> * erc-backend.el (erc-coding-system-precedence): New variable. diff --git a/lisp/erc/erc-lang.el b/lisp/erc/erc-lang.el index 89e36a733e4..a7e971acc61 100644 --- a/lisp/erc/erc-lang.el +++ b/lisp/erc/erc-lang.el @@ -1,6 +1,7 @@ ;;; erc-lang.el --- provide the LANG command to ERC -;; Copyright (C) 2002, 2004, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. +;; Copyright (C) 2002, 2004, 2006, 2007, 2008, 2009, 2010 +;; Free Software Foundation, Inc. ;; Author: Alex Schroeder <alex@gnu.org> ;; Maintainer: Alex Schroeder <alex@gnu.org> @@ -197,17 +198,14 @@ Normungsinstitut (ON), Postfach 130, A-1021 Vienna, Austria.") iso-638-languages))) (message "%s" (cdr (assoc code iso-638-languages)))) -(defvar line) ; dynamically bound in erc-process-input-line - (defun erc-cmd-LANG (language) "Display the language name for the language code given by LANGUAGE." (let ((lang (cdr (assoc language iso-638-languages)))) (erc-display-message nil 'notice 'active - (or lang (concat line ": No such domain")))) + (or lang (concat language ": No such domain")))) t) (provide 'erc-lang) -;; arch-tag: 8ffb1563-cc03-4517-b067-16309d4ff97b ;;; erc-lang.el ends here |