* progmodes/python.el (python-info-current-defun): Fix current

[gnu-emacs] / lisp / terminal.el

diff --git a/lisp/terminal.el b/lisp/terminal.el
index d888a653c93df823d376b054537e01e290c4d9c7..e7903c65061363d3c5e6d82965eb2a569ce132b0 100644 (file)
--- a/lisp/terminal.el
+++ b/lisp/terminal.el
@@ -1,7 +1,7 @@
 ;;; terminal.el --- terminal emulator for GNU Emacs
 
-;; Copyright (C) 1986-1989, 1993-1994, 2001-2011
-;;   Free Software Foundation, Inc.
+;; Copyright (C) 1986-1989, 1993-1994, 2001-2013 Free Software
+;; Foundation, Inc.
 
 ;; Author: Richard Mlynarik <mly@eddie.mit.edu>
 ;; Maintainer: FSF
@@ -105,8 +105,8 @@ performance."
     (define-key map [t] 'te-pass-through)
     (define-key map [switch-frame] 'handle-switch-frame)
     (define-key map "\e" terminal-meta-map)
-    ;(define-key map "\C-l"
-    ;  '(lambda () (interactive) (te-pass-through) (redraw-display)))
+    ;;(define-key map "\C-l"
+    ;;  (lambda () (interactive) (te-pass-through) (redraw-display)))
     (setq terminal-map map)))
 
 (defvar terminal-escape-map nil)
@@ -1005,7 +1005,7 @@ move to start of new line, clear to end of line."
        (unwind-protect
            (progn
              (set-process-filter te-process
-                                 (function (lambda (p s)
+                                 (function (lambda (_p s)
                                     (or (eq (length s) 1)
                                         (setq te-pending-output (list 1 s)))
                                     (throw 'char (aref s 0)))))
@@ -1285,7 +1285,7 @@ in the directory specified by `te-terminfo-directory'."
        ;; Rename it to the desired name.
        ;; We use this roundabout approach
        ;; to avoid any risk of writing a name that
-       ;; was michievouslyt set up as a symlink.
+       ;; was mischievously set up as a symlink.
        (rename-file temp-file file-name))
       ;; Now compile that source to make the binary that the
       ;; programs actually use.
@@ -1327,7 +1327,7 @@ in the directory specified by `te-terminfo-directory'."
          "im=:ei=:dm=:ed=:mi:do=^p^j:nl=^p^j:bs:")
 )
 
-(defun te-tic-sentinel (proc state-change)
+(defun te-tic-sentinel (_proc state-change)
   "If tic has finished, delete the .tif file"
   (if (equal state-change "finished
 ")