From: Philip Kaludercic <philipk@posteo.net>
Date: Thu, 6 Oct 2022 12:03:04 +0000 (+0200)
Subject: * lisp/net/rcirc.el (rcirc-generate-log-filename): Append ".log"
X-Git-Tag: emacs-29.0.90~1616^2~626
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=db69681759991d5403552682706accd6218b731f;p=emacs.git

* lisp/net/rcirc.el (rcirc-generate-log-filename): Append ".log"

(Bug#54718)
---

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index fa481ce5283..1da4fce8315 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2176,9 +2176,11 @@ connection."
 
 (defun rcirc-generate-log-filename (process target)
   "Return filename for log file based on PROCESS and TARGET."
-  (if target
-      (rcirc-generate-new-buffer-name process target)
-    (process-name process)))
+  (concat
+   (if target
+       (rcirc-generate-new-buffer-name process target)
+     (process-name process))
+   ".log"))
 
 (defcustom rcirc-log-filename-function 'rcirc-generate-log-filename
   "A function to generate the filename used by rcirc's logging facility.