notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

more retrying for saving.

Browse Source
This commit is contained in:
Bryce Covert
2016-06-24 21:34:23 -07:00
parent 68021b05e2
commit 089ca9ecb2
2 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
desktop/last-release
View File

@@ -1 +1 @@
6 7

16
desktop/src-common/advent/utils.clj
View File

@@ -120,13 +120,15 @@
:blurb (or blurb name)}] :blurb (or blurb name)}]
(steam/write-bytes (steam/save-file-name id) (.getBytes (pr-str save) "UTF-8")) (steam/write-bytes (steam/save-file-name id) (.getBytes (pr-str save) "UTF-8"))
(on-gl (let [_ (Pixmap/setFilter Pixmap$Filter/BiLinear) (on-gl (let [gl-func (fn []
viewport (-> @ (resolve 'advent.screens.scene/scene) :screen deref :viewport) (let [_ (Pixmap/setFilter Pixmap$Filter/BiLinear)
[x y w h g-l g-r] [(.getScreenX viewport) (.getScreenY viewport) (.getScreenWidth viewport) (.getScreenHeight viewport)] viewport (-> @ (resolve 'advent.screens.scene/scene) :screen deref :viewport)
pm (ScreenUtils/getFrameBufferPixmap x y w h) [x y w h g-l g-r] [(.getScreenX viewport) (.getScreenY viewport) (.getScreenWidth viewport) (.getScreenHeight viewport)]
resized (Pixmap. 160 120 Pixmap$Format/RGB888) pm (ScreenUtils/getFrameBufferPixmap x y w h)
_ (.drawPixmap resized pm 0 0 w h 0 0 160 120)] resized (Pixmap. 160 120 Pixmap$Format/RGB888)
(steam/save-screenshot resized (steam/save-screenshot-file-name id))))))] _ (.drawPixmap resized pm 0 0 w h 0 0 160 120)]
(steam/save-screenshot resized (steam/save-screenshot-file-name id))))]
(try-times gl-func 3)))))]
(try-times save-fn 3))) (try-times save-fn 3)))
(defn remove-save [id] (defn remove-save [id]