[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/org-journal 85090a8a40 1/2: Don't use length>
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/org-journal 85090a8a40 1/2: Don't use length> |
Date: |
Sun, 7 Jan 2024 15:59:50 -0500 (EST) |
branch: elpa/org-journal
commit 85090a8a40c93e23efbeb338f3bb7153e2d70716
Author: Christian Schwarzgruber <c.schwarzgruber.cs@gmail.com>
Commit: Christian Schwarzgruber <c.schwarzgruber.cs@gmail.com>
Don't use length>
See https://elpa.gnu.org/packages/doc/compat.html for list of function not
available in older versions of Emacs.
---
org-journal.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/org-journal.el b/org-journal.el
index ca747ecbe7..db59116172 100644
--- a/org-journal.el
+++ b/org-journal.el
@@ -1130,7 +1130,7 @@ With non-nil prefix argument create a regular entry
instead of a TODO entry."
(save-excursion
(insert "\n"
org-journal-scheduled-string
- (if (length> org-journal-scheduled-string 0) " " ""))
+ (if (> (length org-journal-scheduled-string) 0) " " ""))
(org-insert-time-stamp
time org-time-was-given nil nil nil (list org-end-time-was-given)))))
@@ -1170,7 +1170,7 @@ With non-nil prefix argument create a regular entry
instead of a TODO entry."
(org-end-of-subtree)
(insert "\n"))
(insert org-journal-scheduled-string
- (if (length> org-journal-scheduled-string 0) " " ""))
+ (if (> (length org-journal-scheduled-string) 0) " " ""))
(org-insert-time-stamp time org-time-was-given nil nil nil (list
org-end-time-was-given))
(org-cut-subtree))
(let (org-journal-carryover-items)