diff options
| author | Stefan Monnier | 2019-06-26 10:03:48 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2019-06-26 10:03:48 -0400 |
| commit | 698ff554ac2699ec48fefc85a1307cbc4a183b0d (patch) | |
| tree | a7b7592f7973f81cad4410366d313e790616907e /lisp/erc | |
| parent | 9233865b7005831e63755eb84ae7da060f878a55 (diff) | |
| download | emacs-698ff554ac2699ec48fefc85a1307cbc4a183b0d.tar.gz emacs-698ff554ac2699ec48fefc85a1307cbc4a183b0d.zip | |
* lisp/calc/calc-ext.el (math-scalarp): Fix typo
Diffstat (limited to 'lisp/erc')
| -rw-r--r-- | lisp/erc/erc-track.el | 29 | ||||
| -rw-r--r-- | lisp/erc/erc.el | 2 |
2 files changed, 16 insertions, 15 deletions
diff --git a/lisp/erc/erc-track.el b/lisp/erc/erc-track.el index 53a59207839..bdce91f221f 100644 --- a/lisp/erc/erc-track.el +++ b/lisp/erc/erc-track.el | |||
| @@ -536,17 +536,17 @@ keybindings will not do anything useful." | |||
| 536 | ((when (boundp 'erc-track-when-inactive) | 536 | ((when (boundp 'erc-track-when-inactive) |
| 537 | (if erc-track-when-inactive | 537 | (if erc-track-when-inactive |
| 538 | (progn | 538 | (progn |
| 539 | (add-hook 'window-configuration-change-hook 'erc-user-is-active) | 539 | (add-hook 'window-configuration-change-hook #'erc-user-is-active) |
| 540 | (add-hook 'erc-send-completed-hook 'erc-user-is-active) | 540 | (add-hook 'erc-send-completed-hook #'erc-user-is-active) |
| 541 | (add-hook 'erc-server-001-functions 'erc-user-is-active)) | 541 | (add-hook 'erc-server-001-functions #'erc-user-is-active)) |
| 542 | (erc-track-add-to-mode-line erc-track-position-in-mode-line) | 542 | (erc-track-add-to-mode-line erc-track-position-in-mode-line) |
| 543 | (erc-update-mode-line) | 543 | (erc-update-mode-line) |
| 544 | (add-hook 'window-configuration-change-hook | 544 | (add-hook 'window-configuration-change-hook |
| 545 | 'erc-window-configuration-change) | 545 | #'erc-window-configuration-change) |
| 546 | (add-hook 'erc-insert-post-hook 'erc-track-modified-channels) | 546 | (add-hook 'erc-insert-post-hook #'erc-track-modified-channels) |
| 547 | (add-hook 'erc-disconnected-hook 'erc-modified-channels-update)) | 547 | (add-hook 'erc-disconnected-hook #'erc-modified-channels-update)) |
| 548 | ;; enable the tracking keybindings | 548 | ;; enable the tracking keybindings |
| 549 | (add-hook 'erc-connect-pre-hook 'erc-track-minor-mode-maybe) | 549 | (add-hook 'erc-connect-pre-hook #'erc-track-minor-mode-maybe) |
| 550 | (erc-track-minor-mode-maybe))) | 550 | (erc-track-minor-mode-maybe))) |
| 551 | ;; Disable: | 551 | ;; Disable: |
| 552 | ((when (boundp 'erc-track-when-inactive) | 552 | ((when (boundp 'erc-track-when-inactive) |
| @@ -554,14 +554,15 @@ keybindings will not do anything useful." | |||
| 554 | (if erc-track-when-inactive | 554 | (if erc-track-when-inactive |
| 555 | (progn | 555 | (progn |
| 556 | (remove-hook 'window-configuration-change-hook | 556 | (remove-hook 'window-configuration-change-hook |
| 557 | 'erc-user-is-active) | 557 | #'erc-user-is-active) |
| 558 | (remove-hook 'erc-send-completed-hook 'erc-user-is-active) | 558 | (remove-hook 'erc-send-completed-hook #'erc-user-is-active) |
| 559 | (remove-hook 'erc-server-001-functions 'erc-user-is-active) | 559 | (remove-hook 'erc-server-001-functions #'erc-user-is-active) |
| 560 | (remove-hook 'erc-timer-hook 'erc-user-is-active)) | 560 | ;; FIXME: Never added!? |
| 561 | (remove-hook 'erc-timer-hook #'erc-user-is-active)) | ||
| 561 | (remove-hook 'window-configuration-change-hook | 562 | (remove-hook 'window-configuration-change-hook |
| 562 | 'erc-window-configuration-change) | 563 | #'erc-window-configuration-change) |
| 563 | (remove-hook 'erc-disconnected-hook 'erc-modified-channels-update) | 564 | (remove-hook 'erc-disconnected-hook #'erc-modified-channels-update) |
| 564 | (remove-hook 'erc-insert-post-hook 'erc-track-modified-channels)) | 565 | (remove-hook 'erc-insert-post-hook #'erc-track-modified-channels)) |
| 565 | ;; disable the tracking keybindings | 566 | ;; disable the tracking keybindings |
| 566 | (remove-hook 'erc-connect-pre-hook 'erc-track-minor-mode-maybe) | 567 | (remove-hook 'erc-connect-pre-hook 'erc-track-minor-mode-maybe) |
| 567 | (when erc-track-minor-mode | 568 | (when erc-track-minor-mode |
diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index f5c9decc3a2..0b0cc044e91 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el | |||
| @@ -5453,7 +5453,7 @@ This returns non-nil only if we actually send anything." | |||
| 5453 | ;; obsolete, and when it's finally removed, this binding should | 5453 | ;; obsolete, and when it's finally removed, this binding should |
| 5454 | ;; also be removed. | 5454 | ;; also be removed. |
| 5455 | (with-suppressed-warnings ((lexical str)) | 5455 | (with-suppressed-warnings ((lexical str)) |
| 5456 | (defvar str)) | 5456 | (defvar str)) ;FIXME: Obey the "erc-" prefix convention. |
| 5457 | (let ((str input) | 5457 | (let ((str input) |
| 5458 | (erc-insert-this t) | 5458 | (erc-insert-this t) |
| 5459 | (erc-send-this t) | 5459 | (erc-send-this t) |