Skip to content

parseedn-print tag readers #6

@nivekuil

Description

@nivekuil

For parseedn-read, we can pass an alist of readers to convert e.g. #uuid into a string.
Could this be done in the inverse operation, parseedn-print, as well?
Currently I've just patched it like so:

   ((consp datum)
    (cond
     ((not (listp (cdr datum))) ; dotted pair
      (error "Don't know how to print: %s" datum))
     ((eq 'edn-set (car datum))
      (insert "#{") (parseedn-print-seq (cadr datum)) (insert "}"))
+     ((eq 'edn-uuid (car datum))
+      (insert "#uuid ") (parseedn-print-seq (cdr datum)))
     (t (insert "(") (parseedn-print-seq datum) (insert ")"))))

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type
    No fields configured for issues without a type.

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions