From f1df59fb0eda8c7a1722c1e9f6bdb4439fdc0fe3 Mon Sep 17 00:00:00 2001 From: Stuart Mumford Date: Tue, 3 Feb 2026 10:14:03 +0000 Subject: [PATCH] try a different quoting --- org-clock-waybar.el | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/org-clock-waybar.el b/org-clock-waybar.el index 88d27d8..5abd977 100644 --- a/org-clock-waybar.el +++ b/org-clock-waybar.el @@ -148,20 +148,20 @@ When nil, the percentage text will be an empty string." The output is in JSON format constructed in a way so Waybar can process it. If there is no clocked in task, alt becomes empty and text will be set to the value of `org-clock-waybar-not-clocked-in-text'." - (let* ((text-func (or 'org-clock-waybar-text-function - 'org-clock-waybar-get-task-title)) + (let* ((text-func (or (and (fboundp ('org-clock-waybar-text-function))) + #'org-clock-waybar-get-task-title)) (text (funcall text-func)) - (alt-func (or 'org-clock-waybar-alt-function - 'org-clock-waybar-get-task-category)) + (alt-func (or (and (fboundp ('org-clock-waybar-alt-function))) + #'org-clock-waybar-get-task-category)) (alt (funcall alt-func)) - (tooltip-func (or 'org-clock-waybar-tooltip-function - 'org-clock-waybar-get-tooltip)) + (tooltip-func (or (and (fboundp ('org-clock-waybar-tooltip-function))) + #'org-clock-waybar-get-tooltip)) (tooltip (funcall tooltip-func)) - (class-func (or 'org-clock-waybar-class-function - 'org-clock-waybar-get-tags)) + (class-func (or (and (fboundp ('org-clock-waybar-class-function))) + #'org-clock-waybar-get-tags)) (class (funcall class-func)) (percentage (when (fboundp 'org-clock-waybar-percentage-function) - (funcall 'org-clock-waybar-percentage-function))) + (funcall #'org-clock-waybar-percentage-function))) (output (json-new-object))) (or (null title) (stringp title)