github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-04-26 11:48:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

WIP

Browse Source
This commit is contained in:
Alejandro Alonso 2023-12-18 12:17:15 +01:00
parent f0d0529f58
commit 4690945f59
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
frontend/src/app/main/ui/workspace/viewport.cljs
View File

@ -351,7 +351,8 @@
;; IT's MAGIC!
[gl/canvas {:objects base-objects
:active-frames @active-frames}]
:active-frames @active-frames
:vbox vbox}]
[:svg.viewport-controls
{:xmlns "http://www.w3.org/2000/svg"

7
frontend/src/app/main/ui/workspace/viewport/gl.cljs
View File

@ -40,7 +40,7 @@
(.set programs "default" default-program)))
(defn render-gl
[gl objects]
[gl objects vbox]
(.clearColor gl 0.0 0.0 0.0 0.0)
(.clear gl (.-COLOR_BUFFER_BIT gl))
@ -64,8 +64,11 @@
(js/console.log props)
(js/console.log "default-shaders" default-vertex-shader default-fragment-shader)
(let [objects (unchecked-get props "objects")
vbox (unchecked-get props "vbox")
canvas-ref (mf/use-ref nil)
gl-ref (mf/use-ref nil)]
(println "---------------> vbox" (:x vbox) (:width vbox) (:y vbox) (:height vbox))
(mf/with-effect [canvas-ref]
(let [canvas (mf/ref-val canvas-ref)]
@ -74,7 +77,7 @@
(mf/set-ref-val! gl-ref gl)
(resize-canvas canvas)
(prepare-gl gl)
(render-gl gl objects)
(render-gl gl objects vbox)
(js/console.log "gl" gl)))))
[:canvas {:class (stl/css :canvas)