Here is my attempt at providing a patch to make this behavior
configurable.
From 6f109e57ed9ca6f1d04ad7678573bdc006723258 Mon Sep 17 00:00:00 2001
From: Samuel Loury <konubinix...@gmail.com>
Date: Tue, 26 Aug 2025 12:16:44 +0200
Subject: [PATCH] lisp/org.el: Make the suffix when adding a log note optional

* list/org.el (org-log-note-suffix): this variable contains the suffix to append
  to the added note in `org-store-log-note'. It is customizable through the
  customize interface.
---
 lisp/org.el | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 21622523b..f2134237c 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -2304,6 +2304,14 @@ because Agenda Log mode depends on the format of these entries."
 (unless (assq 'note org-log-note-headings)
   (push '(note . "%t") org-log-note-headings))
 
+(defcustom org-log-note-suffix " \\\\"
+  "Suffix for notes added to entries.
+
+Whenever the note contains text, this suffix will be appended to the note."
+  :group  'org-todo
+  :group  'org-progress
+  :type 'string)
+
 (defvaralias 'org-log-state-notes-into-drawer 'org-log-into-drawer)
 
 (defcustom org-log-into-drawer nil
@@ -11000,7 +11008,7 @@ items are State notes."
 				    org-log-note-previous-state 1 -1)))
 			  (t (format "\"%s\""
 				     org-log-note-previous-state)))))))
-      (when lines (setq note (concat note " \\\\")))
+      (when (and lines org-log-note-suffix (setq note (concat note org-log-note-suffix))))
       (push note lines))
     (when (and lines (not org-note-abort))
       (with-current-buffer (marker-buffer org-log-note-marker)
-- 
2.45.2

-- 
Konubinix
GPG Key    : 7439106A
Fingerprint: 5993 BE7A DA65 E2D9 06CE  5C36 75D2 3CED 7439 106A

Attachment: signature.asc
Description: PGP signature

Reply via email to