Penpot/penpot
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-01-27 08:59:17 -05:00
Code Issues Activity

Merge pull request #1894 from penpot/superalex-fix-scrollbars-not-shown

Browse source 
Fix Scrollbars not shown
This commit is contained in:
Pablo Alba 2022-05-12 14:25:51 +02:00 • committed by GitHub
commit d387ca81d8
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
frontend/src/app/main/ui/workspace/viewport/scroll_bars.cljs
View file

@ -6,6 +6,7 @@
(ns app.main.ui.workspace.viewport.scroll-bars (ns app.main.ui.workspace.viewport.scroll-bars
(:require (:require
[app.common.colors :as clr]
[app.common.geom.shapes :as gsh] [app.common.geom.shapes :as gsh]
[app.common.pages.helpers :as cph] [app.common.pages.helpers :as cph]
[app.main.data.workspace :as dw] [app.main.data.workspace :as dw]
@ -188,7 +189,7 @@
[:* [:*
(when show-v-scroll? (when show-v-scroll?
[:g.v-scroll [:g.v-scroll {:fill clr/black}
[:rect {:on-mouse-move #(on-mouse-move % :y) [:rect {:on-mouse-move #(on-mouse-move % :y)
:on-mouse-down #(on-mouse-down % :y) :on-mouse-down #(on-mouse-down % :y)
:on-mouse-up on-mouse-up :on-mouse-up on-mouse-up
@ -202,7 +203,7 @@
:style {:stroke "white" :style {:stroke "white"
:stroke-width (/ 0.15 zoom)}}]]) :stroke-width (/ 0.15 zoom)}}]])
(when show-h-scroll? (when show-h-scroll?
[:g.h-scroll [:g.h-scroll {:fill clr/black}
[:rect {:on-mouse-move #(on-mouse-move % :x) [:rect {:on-mouse-move #(on-mouse-move % :x)
:on-mouse-down #(on-mouse-down % :x) :on-mouse-down #(on-mouse-down % :x)
:on-mouse-up on-mouse-up :on-mouse-up on-mouse-up