diff options
Diffstat (limited to 'org-fc-algo-sm2.el')
| -rw-r--r-- | org-fc-algo-sm2.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/org-fc-algo-sm2.el b/org-fc-algo-sm2.el index 827541c..f51d3ab 100644 --- a/org-fc-algo-sm2.el +++ b/org-fc-algo-sm2.el @@ -23,6 +23,8 @@ ;; ;;; Code: +(require 'cl-lib) + (defmacro org-fc-property (symbol standard doc &rest args) (let (defcustom-args property reader) (while args @@ -32,7 +34,7 @@ (unless args (error "Keyword %s is missing an argument" keyword)) (let ((value (pop args))) - (case keyword + (cl-case keyword (:property (setq property value)) (:reader (setq reader value)) (t |