lisp/progmodes/*.el: Lexical-binding cleanup.

This commit is contained in:
Juanma Barranquero 2011-04-22 20:44:26 +02:00
parent 7ede3b6577
commit e02f48d76b
36 changed files with 456 additions and 307 deletions

View file

@ -2495,7 +2495,7 @@ with skeleton expansions for compound statement templates.
;; doesn't seem to work properly.
(add-to-list 'hs-special-modes-alist
`(python-mode "^\\s-*\\(?:def\\|class\\)\\>" nil "#"
,(lambda (arg)
,(lambda (_arg)
(python-end-of-defun)
(skip-chars-backward " \t\n"))
nil))
@ -2554,7 +2554,7 @@ Runs `jython-mode-hook' after `python-mode-hook'."
(setq overlay-arrow-position nil
python-pdbtrack-is-tracking-p nil)))
(defun python-pdbtrack-track-stack-file (text)
(defun python-pdbtrack-track-stack-file (_text)
"Show the file indicated by the pdb stack entry line, in a separate window.
Activity is disabled if the buffer-local variable
@ -2666,8 +2666,8 @@ problem."
)
)
(defun python-pdbtrack-grub-for-buffer (funcname lineno)
"Find recent python-mode buffer named, or having function named funcname."
(defun python-pdbtrack-grub-for-buffer (funcname _lineno)
"Find recent Python mode buffer named, or having function named FUNCNAME."
(let ((buffers (buffer-list))
buf
got)
@ -2725,7 +2725,7 @@ comint believe the user typed this string so that
(interactive)
(python-pdbtrack-toggle-stack-tracking 0))
(defun python-sentinel (proc msg)
(defun python-sentinel (_proc _msg)
(setq overlay-arrow-position nil))
(provide 'python)