emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r102332: * lisp/erc/erc-lang.el (erc-


From: Glenn Morris
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r102332: * lisp/erc/erc-lang.el (erc-cmd-LANG): Fix what may have been a typo.
Date: Wed, 10 Nov 2010 19:50:20 -0800
User-agent: Bazaar (2.0.3)

------------------------------------------------------------
revno: 102332
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Wed 2010-11-10 19:50:20 -0800
message:
  * lisp/erc/erc-lang.el (erc-cmd-LANG): Fix what may have been a typo.
modified:
  lisp/erc/ChangeLog
  lisp/erc/erc-lang.el
=== modified file 'lisp/erc/ChangeLog'
--- a/lisp/erc/ChangeLog        2010-11-05 14:17:46 +0000
+++ b/lisp/erc/ChangeLog        2010-11-11 03:50:20 +0000
@@ -1,3 +1,7 @@
+2010-11-11  Glenn Morris  <address@hidden>
+
+       * erc-lang.el (erc-cmd-LANG): Fix what may have been a typo.
+
 2010-11-05  Lars Magne Ingebrigtsen  <address@hidden>
 
        * erc-backend.el (erc-coding-system-precedence): New variable.

=== modified file 'lisp/erc/erc-lang.el'
--- a/lisp/erc/erc-lang.el      2010-01-13 08:35:10 +0000
+++ b/lisp/erc/erc-lang.el      2010-11-11 03:50:20 +0000
@@ -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 <address@hidden>
 ;; Maintainer: Alex Schroeder <address@hidden>
@@ -197,17 +198,14 @@
                                      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


reply via email to

[Prev in Thread] Current Thread [Next in Thread]