mirror of
https://github.com/penpot/penpot.git
synced 2025-05-20 02:56:12 +02:00
🐛 Add soft size limit for file names
This commit is contained in:
parent
3994bf583c
commit
72f7e5bb76
1 changed files with 13 additions and 12 deletions
|
@ -593,6 +593,7 @@
|
||||||
(defn rename-file
|
(defn rename-file
|
||||||
[id name]
|
[id name]
|
||||||
{:pre [(uuid? id) (string? name)]}
|
{:pre [(uuid? id) (string? name)]}
|
||||||
|
(let [name (str/prune name 200)]
|
||||||
(ptk/reify ::rename-file
|
(ptk/reify ::rename-file
|
||||||
IDeref
|
IDeref
|
||||||
(-deref [_]
|
(-deref [_]
|
||||||
|
@ -606,7 +607,7 @@
|
||||||
(watch [_ _ _]
|
(watch [_ _ _]
|
||||||
(let [params {:id id :name name}]
|
(let [params {:id id :name name}]
|
||||||
(->> (rp/cmd! :rename-file params)
|
(->> (rp/cmd! :rename-file params)
|
||||||
(rx/ignore))))))
|
(rx/ignore)))))))
|
||||||
|
|
||||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||||
;; Workspace State Manipulation
|
;; Workspace State Manipulation
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue