utils: Simplify read-org-variable-mapping.

This commit is contained in:
Sergiu Ivanov 2020-03-24 21:17:05 +01:00
parent ac8c999272
commit 502fcb18bb

View file

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