From: Glenn Morris Date: Sat, 21 Sep 2013 00:52:07 +0000 (-0700) Subject: * erc.el (erc-invite-only-mode, erc-toggle-channel-mode): X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~1494 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=26d078a69e2251efc65d1a25c3f59ceca50de87d;p=emacs.git * erc.el (erc-invite-only-mode, erc-toggle-channel-mode): Remove unused local variable `erc-force-send'. --- diff --git a/lisp/erc/ChangeLog b/lisp/erc/ChangeLog index d07bc341c92..ec154fb7efa 100644 --- a/lisp/erc/ChangeLog +++ b/lisp/erc/ChangeLog @@ -1,3 +1,8 @@ +2013-09-21 Glenn Morris + + * erc.el (erc-invite-only-mode, erc-toggle-channel-mode): + Remove unused local variable `erc-force-send'. + 2013-09-19 Glenn Morris * erc-button.el (erc-button-click-button, erc-button-press-button): diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el index 4f719562c38..15ff0e5737e 100644 --- a/lisp/erc/erc.el +++ b/lisp/erc/erc.el @@ -5541,8 +5541,7 @@ If ARG is non-nil, turn this mode off (-i). This command is sent even if excess flood is detected." (interactive "P") (erc-set-active-buffer (current-buffer)) - (let ((tgt (erc-default-target)) - (erc-force-send t)) ;FIXME: Not used anywhere! + (let ((tgt (erc-default-target))) (cond ((or (not tgt) (not (erc-channel-p tgt))) (erc-display-message nil 'error (current-buffer) 'no-target)) (arg (erc-load-irc-script-lines (list (concat "/mode " tgt " -i")) @@ -5579,8 +5578,7 @@ If CHANNEL is non-nil, toggle MODE for that channel, otherwise use `erc-default-target'." (interactive "P") (erc-set-active-buffer (current-buffer)) - (let ((tgt (or channel (erc-default-target))) - (erc-force-send t)) ;FIXME: Not used anywhere! + (let ((tgt (or channel (erc-default-target)))) (cond ((or (null tgt) (null (erc-channel-p tgt))) (erc-display-message nil 'error 'active 'no-target)) ((member mode erc-channel-modes)