Fix some smaller things (739b9d43) · Commits · Bernd Paysan / net2o

doc/ft2019-presentation.fs

+20 −15

Original line number	Diff line number	Diff line
		@@ -146,10 +146,10 @@ end-class slide-actor
		Saturate 1 saturate% opengl:glUniform1fv +sync endof
		k-f6 of saturate% sf@ 0.1e f- 0e fmax saturate% sf!
		Saturate 1 saturate% opengl:glUniform1fv +sync endof
		k-f7 of color-theme 0<> IF 0.25e o
		k-f7 of color-theme 0<> IF anim-end 0.25e o
		[: 1e fswap f- fdup f>s to color-theme 0.5e f+ ColorMode! +sync +vpsync ;]
		>animate THEN endof
		k-f8 of color-theme 0= IF 0.25e o
		k-f8 of color-theme 0= IF anim-end 0.25e o
		[: fdup f>s to color-theme 0.5e f+ ColorMode! +sync +vpsync ;]
		>animate THEN endof
		k-f1 of top-widget ..widget endof
		@@ -246,7 +246,7 @@ $10 stack: vp-tops
		{{
		{{
		glue*l }}glue \ ) $CCDDDD3F color, 4e }}frame dup .button1
		l" CloudCalypse" /title
		l" CloudCalypse, was nun?" /title
		l" It looks like you’ve reached the end." /subtitle
		l" Wie man Daten nach net2o importiert" /subtitle
		{{
		@@ -431,7 +431,7 @@ $10 stack: vp-tops
		"https://takeout.google.com/settings/takeout" link[]
		glue*l }}glue \ ) $CCDDDD3F 4e }}frame dup .button1
		tex: g+takeout
		' g+takeout "google-takeout.png" 1.333e }}image-file drop /center
		' g+takeout "google-takeout.png" 1e }}image-file drop /center
		glue*l }}glue \ ) $CCDDDD3F 4e }}frame dup .button1
		}}v box[] >bdr
		}}z box[] /flip dup >slides
		@@ -503,7 +503,9 @@ $10 stack: vp-tops
		"}" \\
		tex: vp-google+ glue*lll ' vp-google+ }}vp vp[] dup vp-tops >stack
		!i18n \sans \normal
		day-mode $DDDDDDFF color, night-mode
		$202020FF color, fdup to slider-color to slider-fgcolor
		day-mode
		dup font-size# f2/ f2/ fdup vslider
		}}h box[]
		}}v box[] >bdr
		@@ -576,7 +578,6 @@ $10 stack: vp-tops
		"}" \\
		tex: vp-google2+ glue*lll ' vp-google2+ }}vp vp[] dup vp-tops >stack
		!i18n \sans \normal
		$202020FF color, fdup to slider-color to slider-fgcolor
		dup font-size# f2/ f2/ fdup vslider
		}}h box[]
		}}v box[] >bdr
		@@ -633,7 +634,11 @@ $10 stack: vp-tops
		" }," \\
		tex: vp-facebook glue*lll ' vp-facebook }}vp vp[] dup vp-tops >stack
		!i18n \sans \normal
		day-mode
		$CCCCFFFF color, fdrop
		night-mode
		$000040FF color, fdup to slider-color to slider-fgcolor
		day-mode
		dup font-size# f2/ f2/ fdup vslider
		}}h box[]
		}}v box[] >bdr
		@@ -687,6 +692,7 @@ $10 stack: vp-tops
		"}, {" \\
		tex: vp-twitter glue*lll ' vp-twitter }}vp vp[] dup vp-tops >stack
		!i18n \sans \normal
		day-mode $DDDDDDFF color, night-mode
		$202020FF color, fdup to slider-color to slider-fgcolor
		dup font-size# f2/ f2/ fdup vslider
		}}h box[]
		@@ -731,7 +737,6 @@ $10 stack: vp-tops
		" </entry>" \\
		tex: vp-blogger glue*lll ' vp-blogger }}vp vp[] dup vp-tops >stack
		!i18n \sans \normal
		$202020FF color, fdup to slider-color to slider-fgcolor
		dup font-size# f2/ f2/ fdup vslider
		}}h box[]
		}}v box[] >bdr
		@@ -763,7 +768,7 @@ $10 stack: vp-tops
		l" Videos " l" mkv/webm" b\\
		l" Timeline " l" Chat log mit Links auf DVCS–Projekt" b\\
		l" Posting " l" DVCS–Projekt, hält Daten+Kommentare zusammen" b\\
		l" DVCS–projekt " l" Chat log mit Links auf patchset/snapshot" b\\
		l" DVCS–Projekt " l" Chat log mit Links auf patchset/snapshot" b\\
		l" Teilen " l" Fork+posting+log message in eigener Timeline" b\\
		l" Kommentar " l" Checkin von weiterem Posting" b\\
		l" Likes " l" Chat messages mit Emoji direkt ins DVCS–Projekt" b\\

doc/google-takeout.png

+1 KiB (42.3 KiB)

Loading image diff...

gui.fs

+2 −2

Original line number	Diff line number	Diff line
		@@ -1043,10 +1043,10 @@ end-class net2o-actor

		:noname ( ekey -- )
		case
		k-f5 of color-theme 0<> IF 0.25e o
		k-f5 of color-theme 0<> IF anim-end 0.25e o
		[: 1e fswap f- fdup f>s to color-theme 0.5e f+ ColorMode! +sync +vpsync ;]
		>animate THEN endof
		k-f6 of color-theme 0= IF 0.25e o
		k-f6 of color-theme 0= IF anim-end 0.25e o
		[: fdup f>s to color-theme 0.5e f+ ColorMode! +sync +vpsync ;]
		>animate THEN endof
		[ box-actor :: ekeyed ] EXIT