Shared Smalltalk Workspace http://ws.stfx.eu/

http://ws.stfx.eu/http://ws.stfx.eu/

Doit | Raw | Getting Started Workspace | Home | New
Author fullName: 'SvenVanCaekenberghe'.

TaskbarMorph showWindowPreview: false.

#('SourceCodeProRegular' 'SourceCodeProBold' 'SourceSansProRegular' 'SourceSansProBold') do: [ :each | 
		Smalltalk globals 
			at: each asSymbol
			ifAbsent: [
				Gofer new 
					smalltalkhubUser: 'girba' project: 'FreeFonts';
					package: each;
					load ].
		(Smalltalk at: each asSymbol) new install ].
	
FreeTypeSystemSettings loadFt2Library: true.
FreeTypeFontProvider current updateFromSystem.

StandardFonts 
		setAllStandardFontsTo: (LogicalFont familyName: 'Source Sans Pro' pointSize: 12);
		haloFont: (LogicalFont familyName: 'Source Sans Pro' pointSize: 9);
		windowTitleFont: (LogicalFont familyName: 'Source Sans Pro Bold' pointSize: 12);
		balloonFont: (LogicalFont familyName: 'Source Sans Pro' pointSize: 9);
		codeFont: (LogicalFont familyName: 'Source Code Pro' pointSize: 11).
THIS SOFTWARE SERVICE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHOR OR SERVICE PROVIDER BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE SERVICE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE SERVICE.