---
 lisp/org-macs.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-macs.el b/lisp/org-macs.el
index 2eed0028e..d6879e8cf 100644
--- a/lisp/org-macs.el
+++ b/lisp/org-macs.el
@@ -803,7 +803,7 @@ When NEXT is non-nil, check the next line instead."
   "Return string with random (version 4) UUID."
   (let ((rnd (md5 (format "%s%s%s%s%s%s%s"
               (random)
-              (time-convert nil 'list)
+              (org-time-convert-to-list nil)
               (user-uid)
               (emacs-pid)
               (user-full-name)

base-commit: 48fffa5daca3e13e4c5ff3928e3b1858cf2bab6b
--
2.20.1

From 929b8ec807ac83f70a0a689c01ce704db9e3994e Mon Sep 17 00:00:00 2001
From: Justin Vallon <justinval...@gmail.com>
Date: Tue, 4 Jul 2023 19:01:27 -0400
Subject: [PATCH] Use compat org-time-convert-to-list for emacs <27.1

---
 lisp/org-macs.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-macs.el b/lisp/org-macs.el
index 2eed0028e..d6879e8cf 100644
--- a/lisp/org-macs.el
+++ b/lisp/org-macs.el
@@ -803,7 +803,7 @@ When NEXT is non-nil, check the next line instead."
   "Return string with random (version 4) UUID."
   (let ((rnd (md5 (format "%s%s%s%s%s%s%s"
 			  (random)
-			  (time-convert nil 'list)
+			  (org-time-convert-to-list nil)
 			  (user-uid)
 			  (emacs-pid)
 			  (user-full-name)

base-commit: 48fffa5daca3e13e4c5ff3928e3b1858cf2bab6b
-- 
2.20.1

Reply via email to