A
Дичь конечно))
Говорят в таких случая можно использовать replace(" " "_") :)
Говорят в таких случая можно использовать replace(" " "_") :)
Дичь конечно))
Говорят в таких случая можно использовать replace(" " "_") :)
Size: a a a
2020 December 11
T
Можно еще к этому munge добавить)
T
(keyword (clojure.string/replace (munge "key with spaces and other unreadable symbols / \\ | # % ( ) { } [ ]") #" " "_"))
;;=> :key_with_spaces_and_other_unreadable_symbols__SLASH___BSLASH___BAR___SHARP___PERCENT__(_)__LBRACE___RBRACE___LBRACK___RBRACK_T
(keyword (clojure.string/replace (munge "key with spaces and other unreadable symbols / \\ | # % ( ) { } [ ]") #" " "_"))
;;=> :key_with_spaces_and_other_unreadable_symbols__SLASH___BSLASH___BAR___SHARP___PERCENT__(_)__LBRACE___RBRACE___LBRACK___RBRACK_Не. Не защищает наверняка)
IG
Если попадаются кейворды с пробелами, можно пройтись через walk/postwalk c функцией
IG
(fn [x] (if (keyword? x) (clean-keyword x) x))
IG
где
clean-keyword берет name, чистит строку, а потом обратно в keywordKC
Оригинальная проблема кажется была про pr-str. Вместо дополнительных хождений по структурам можно попробовать использовать https://clojuredocs.org/clojure.core/print-method
KC
Доопределить его для Keyword внутри чекая пробелы и все что ломает ридер
KC
Если кейворд нормальный - вызывать его toString
T
Если кейворд нормальный - вызывать его toString
А если не нормальный, то можно использовать кастомный ридер токен
#keyword "k e y"KC
Да, только советую вместо строки ставить вектор чтобы покрыть кейворды с нэймспейсом
KC
расширяя дата литералами например так
#edn.invalid/keyword [“string with spaces”]Вот так
T
Да, только советую вместо строки ставить вектор чтобы покрыть кейворды с нэймспейсом
Слеш внутри можно юзать
(namespace (keyword "foo/bar"))
;; => "foo"
KC
Не, (keyword nil "foo/bar")
KC
(defmethod print-method clojure.lang.Keyword [kw ^java.io.Writer w]
(.write w (pr-str (tagged-literal 'kw [(namespace kw) (name kw)]))))
работает)
(pr-str (keyword nil "name with spaces")) ;; => "#kw [nil \"name with spaces\"]"
T
(defmethod print-method clojure.lang.Keyword [kw ^java.io.Writer w]
(.write w (pr-str (tagged-literal 'kw [(namespace kw) (name kw)]))))
работает)
(pr-str (keyword nil "name with spaces")) ;; => "#kw [nil \"name with spaces\"]"
Мне всё-таки больше нравится без вектора, т.к. вектор может позволить более двух элементов
T
(let [kw (keyword "foo/bar/baz/quux")]Строкой можно достичь всего что надо для полностью какого угодно киворда
[(namespace kw)
(name kw)])
;; => ["foo" "bar/baz/quux"]
KC
да как угодно, я со своей колокольни советую )