Commit 9d8ec43e authored by Bernd Paysan's avatar Bernd Paysan

Work on album viewer

parent 2bdd3456
......@@ -1095,8 +1095,7 @@ hash: imgs# \ hash of images
last# cell+ $@ album-imgs[] $!
album-prepare
[: 1 64s /string ['] ?read-enc-hashed catch nothrow
IF 2drop thumb.png$ $@
ELSE save-mem THEN ;] is load-img
IF 2drop thumb.png$ $@ THEN save-mem ;] is load-img
4 album-reload
md-frame album-viewer >o to parent-w o>
album-viewer md-frame .childs[] >stack
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment