X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/7d5989e14aacad4aa0775339dab645db80ab7144..c73bd236f75b742ad4642ec94798987ae6e3e1e8:/lisp/erc/erc-identd.el diff --git a/lisp/erc/erc-identd.el b/lisp/erc/erc-identd.el index 8a70a743ed..db933094e1 100644 --- a/lisp/erc/erc-identd.el +++ b/lisp/erc/erc-identd.el @@ -9,7 +9,7 @@ ;; GNU Emacs is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by -;; the Free Software Foundation; either version 2, or (at your option) +;; the Free Software Foundation; either version 3, or (at your option) ;; any later version. ;; GNU Emacs is distributed in the hope that it will be useful, @@ -74,7 +74,8 @@ This can be either a string or a number." (format "%s, %s : USERID : %s : %s\n" port-on-server port-on-client system-type (user-login-name))) - (process-send-eof erc-identd-process))))) + (stop-process erc-identd-process) + (delete-process proc))))) ;;;###autoload (defun erc-identd-start (&optional port)