github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-09-10 05:58:47 +00:00
Code Issues Packages Projects Releases Wiki Activity

🐛 Fix broken test

Browse Source
This commit is contained in:
alonso.torres 2026-05-14 16:16:27 +02:00 committed by Alonso Torres
parent 7429b97f86
commit 46c642cf6d
1 changed files with 15 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
frontend/test/frontend_tests/data/workspace_shortcuts_test.cljs
View File

@ -19,12 +19,19 @@
:code code :code code
:preventDefault #(reset! prevented? true)}) :preventDefault #(reset! prevented? true)})
(defn- mock-emit!
[emitted]
(fn
([] nil)
([event] (swap! emitted conj event))
([event & _more] nil)))
(t/deftest display-guides-handler-detects-physical-keys (t/deftest display-guides-handler-detects-physical-keys
(t/testing "US layout uses Ctrl+Quote" (t/testing "US layout uses Ctrl+Quote"
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly false) (with-redefs [cf/check-platform? (constantly false)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:ctrl? true :code "Quote" :prevented? prevented?}))) (keyboard-event {:ctrl? true :code "Quote" :prevented? prevented?})))
(t/is (true? @prevented?)) (t/is (true? @prevented?))
@ -34,7 +41,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly false) (with-redefs [cf/check-platform? (constantly false)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:ctrl? true :shift? true :code "Backslash" :prevented? prevented?}))) (keyboard-event {:ctrl? true :shift? true :code "Backslash" :prevented? prevented?})))
(t/is (true? @prevented?)) (t/is (true? @prevented?))
@ -44,7 +51,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly true) (with-redefs [cf/check-platform? (constantly true)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:meta? true :code "Quote" :prevented? prevented?}))) (keyboard-event {:meta? true :code "Quote" :prevented? prevented?})))
(t/is (true? @prevented?)) (t/is (true? @prevented?))
@ -54,7 +61,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly true) (with-redefs [cf/check-platform? (constantly true)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:meta? true :shift? true :code "Backslash" :prevented? prevented?}))) (keyboard-event {:meta? true :shift? true :code "Backslash" :prevented? prevented?})))
(t/is (true? @prevented?)) (t/is (true? @prevented?))
@ -64,7 +71,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly true) (with-redefs [cf/check-platform? (constantly true)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:ctrl? true :code "Quote" :prevented? prevented?}))) (keyboard-event {:ctrl? true :code "Quote" :prevented? prevented?})))
(t/is (false? @prevented?)) (t/is (false? @prevented?))
@ -74,7 +81,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly true) (with-redefs [cf/check-platform? (constantly true)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:meta? true :shift? true :code "Quote" :prevented? prevented?}))) (keyboard-event {:meta? true :shift? true :code "Quote" :prevented? prevented?})))
(t/is (false? @prevented?)) (t/is (false? @prevented?))
@ -84,7 +91,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly false) (with-redefs [cf/check-platform? (constantly false)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:code "Quote" :prevented? prevented?})) (keyboard-event {:code "Quote" :prevented? prevented?}))
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
@ -96,7 +103,7 @@
(let [prevented? (atom false) (let [prevented? (atom false)
emitted (atom [])] emitted (atom [])]
(with-redefs [cf/check-platform? (constantly false) (with-redefs [cf/check-platform? (constantly false)
st/emit! #(swap! emitted conj %)] st/emit! (mock-emit! emitted)]
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown
(keyboard-event {:ctrl? true :shift? true :code "Quote" :prevented? prevented?})) (keyboard-event {:ctrl? true :shift? true :code "Quote" :prevented? prevented?}))
(shortcuts/on-display-guides-keydown (shortcuts/on-display-guides-keydown