Skip to content

Commit

Permalink
Don't use length>
Browse files Browse the repository at this point in the history
See https://elpa.gnu.org/packages/doc/compat.html for list of function not
available in older versions of Emacs.
  • Loading branch information
casch-at committed Jan 7, 2024
1 parent 32715d2 commit 85090a8
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions org-journal.el
Original file line number Diff line number Diff line change
Expand Up @@ -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)))))

Expand Down Expand Up @@ -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)
Expand Down

0 comments on commit 85090a8

Please sign in to comment.