Fix typo in previous erc.el change

* lisp/erc/erc.el (erc-send-input): Fix typo in previous checkin.

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 8d5c9728285b1c5c2a5471923fd2f02d8e278e48..0419f3d7df6250cd2defede3fdfd86ecd8092d27 100644 (file)
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -5480,24 +5480,24 @@ This returns non-nil only if we actually send anything."
        ;; The functions can return nil to inhibit sending.
        (funcall func state))
       (when (and (erc-input-sendp state)
-                erc-send-this))
-      (let ((string (erc-input-string state)))
-        (if (or (string-match "\n" string)
-                (not (string-match erc-command-regexp string)))
-            (mapc
-             (lambda (line)
-              (mapc
-                (lambda (line)
-                  ;; Insert what has to be inserted for this.
-                 (when (erc-input-insertp state)
-                    (erc-display-msg line))
-                  (erc-process-input-line (concat line "\n")
-                                          (null erc-flood-protect) t))
-                (or (and erc-flood-protect (erc-split-line line))
-                    (list line))))
-             (split-string string "\n"))
-          (erc-process-input-line (concat string "\n") t nil))
-        t)))))
+                erc-send-this)
+       (let ((string (erc-input-string state)))
+          (if (or (string-match "\n" string)
+                  (not (string-match erc-command-regexp string)))
+              (mapc
+               (lambda (line)
+                (mapc
+                  (lambda (line)
+                    ;; Insert what has to be inserted for this.
+                   (when (erc-input-insertp state)
+                      (erc-display-msg line))
+                    (erc-process-input-line (concat line "\n")
+                                            (null erc-flood-protect) t))
+                  (or (and erc-flood-protect (erc-split-line line))
+                      (list line))))
+               (split-string string "\n"))
+            (erc-process-input-line (concat string "\n") t nil))
+          t))))))
 
 (defun erc-display-command (line)
   (when erc-insert-this