[Erc-commit] [commit][master] Fix error in erc-command-no-process-p

[mwolson]

commit c4a6e3578e2cb9780d69f3a3dce2ea394eaa8e41
Author: Michael W. Olson <address@hidden>
Date:   Mon Aug 13 21:23:57 2007 -0400

    Fix error in erc-command-no-process-p
    
    * erc.el (erc-command-no-process-p): Fix bug: the return value of
      erc-extract-command-from-line is a list rather than a single symbol.
      Thanks to jbms for the report.

diff --git a/ChangeLog b/ChangeLog
index ef5a24d..4c602d6 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2007-08-14  Michael Olson  <address@hidden>
+
+       * erc.el (erc-command-no-process-p): Fix bug: the return value of
+       erc-extract-command-from-line is a list rather than a single
+       symbol.  Thanks to jbms for the report.
+
 2007-08-12  Michael Olson  <address@hidden>
 
        * erc-identd.el (erc-identd-filter): Instead of sending an EOF
diff --git a/erc.el b/erc.el
index 324a820..fd709ed 100644
--- a/erc.el
+++ b/erc.el
@@ -2496,7 +2496,8 @@ See also `erc-server-send'."
 is not alive, nil otherwise."
   (let ((fun (erc-extract-command-from-line str)))
     (and fun
-        (get fun 'process-not-needed))))
+        (symbolp (car fun))
+        (get (car fun) 'process-not-needed))))
 
 (defun erc-command-name (cmd)
   "For CMD being the function name of a ERC command, something like