paredit/join removes comments when joining strings

[lread]

Version
1.1.49

Platform
All

Symptom
paredit/join is deleting comments when they lie between the two strings to be joined.

Reproduction

(-> "(\"Hello \" ;; comment\n\"World\")"
    z/of-string
    z/down
    z/right
    pe/join
    ((juxt z/string z/root-string)))

Actual behavior

;; => ["\"Hello World\"" "(\"Hello World\")"]

Thoughts
Option 1: no-op because we don't really have 2 strings next to each other

Option 2: push out comment like so:

"(\"Hello World\" ;; comment\n)"

Joining by sequence does allow for comments between the seqs and preserves the comment...

(-> "(32) ;; comment\n(44)"
    z/of-string
    z/right
    pe/join
    ((juxt z/string z/root-string)))
;; => ["44" "[32 ;; comment\n44]"]

So I think I'll go for option 2.

Expected behavior

;; => ["\"Hello World\"" "(\"Hello World\" ;; comment\n)"]

Action
I'll handle.