From f9d87dd8791d4e77929f21e4f73d92ef966722cc Mon Sep 17 00:00:00 2001
From: Krzysztof Jurewicz <krzysztof.jurewicz@gmail.com>
Date: Sun, 27 Dec 2015 09:04:02 +0100
Subject: [PATCH] Fix auth source lookups from erc with port numbers

* lisp/erc/erc.el (erc-open): `auth-source' wants strings, not port
numbers (bug#20541).

Copyright-paperwork-exempt: yes
---
 lisp/erc/erc.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/erc/erc.el b/lisp/erc/erc.el
index 70e37348b6a..04e99c7b884 100644
--- a/lisp/erc/erc.el
+++ b/lisp/erc/erc.el
@@ -2025,7 +2025,8 @@ Returns the buffer for the given server or channel."
                            (auth-source-search :host server
                                                :max 1
                                                :user nick
-                                               :port port
+                                               ;; secrets.el wouldn’t accept a number
+                                               :port (if (numberp port) (number-to-string port) port)
                                                :require '(:secret)))
                       :secret)))
                 (if (functionp secret)
-- 
2.39.5