🐛 Add soft size limit for file names

This commit is contained in:
Andrey Antukh 2024-02-20 16:54:40 +01:00
parent 3994bf583c
commit 72f7e5bb76

View file

@ -593,6 +593,7 @@
(defn rename-file
[id name]
{:pre [(uuid? id) (string? name)]}
(let [name (str/prune name 200)]
(ptk/reify ::rename-file
IDeref
(-deref [_]
@ -606,7 +607,7 @@
(watch [_ _ _]
(let [params {:id id :name name}]
(->> (rp/cmd! :rename-file params)
(rx/ignore))))))
(rx/ignore)))))))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Workspace State Manipulation