diff --git a/utils.rkt b/utils.rkt index d258153..b0fbad8 100644 --- a/utils.rkt +++ b/utils.rkt @@ -224,8 +224,8 @@ ;;; Reads a variable mapping from a string, such as the one which ;;; Org-mode produces from tables. -(define (read-org-variable-mapping str) - (make-immutable-hash (unstringify-pairs (read-org-sexp str)))) +(define read-org-variable-mapping + (compose make-immutable-hash unstringify-pairs read-org-sexp)) ;;; A synonym for read-org-variable-mapping. (define-syntax-rule (unorg str) (read-org-variable-mapping str))