Packages April 2015

packages@lists.squeakfoundation.org

2 participants
1358 discussions

The Trunk: GetText-nice.36.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

Nicolas Cellier uploaded a new version of GetText to project The Trunk: http://source.squeak.org/trunk/GetText-nice.36.mcz ==================== Summary ==================== Name: GetText-nice.36 Author: nice Time: 1 May 2015, 1:40:18.364 am UUID: 4b76e586-b5fb-4611-a82a-56ac5461f57d Ancestors: GetText-kfr.35 Though it can't really be tested in current trunk image state (InternalTranslator is not initialized) , modernize the way to utf8+gzip+base64 encode... This how how simpler the world could be without those Multi RW Binary or Text things, no need to send those reset/ascii/binary incantations. =============== Diff against GetText-kfr.35 =============== Item was changed: ----- Method: LanguageEditor>>codeSelectedTranslationAsMimeString (in category 'gui methods') ----- codeSelectedTranslationAsMimeString + | keys code cont | - | keys code tmpStream s2 gzs cont | keys := selectedTranslations collect: [:key | self translations at: key]. code := String streamContents: [:aStream | self translator fileOutOn: aStream keys: keys withBOM: false]. - tmpStream := MultiByteBinaryOrTextStream on: ''. - tmpStream converter: UTF8TextConverter new. - tmpStream nextPutAll: code. - s2 := RWBinaryOrTextStream on: ''. - gzs := GZipWriteStream on: s2. - tmpStream reset. - gzs nextPutAll: (tmpStream binary contentsOfEntireFile asString) contents. - gzs close. - s2 reset. - cont := String streamContents: [:strm | + strm nextPutAll: '"UTF8+Gzip+Base64 encoded translation for;'; cr. - strm nextPutAll: '"Gzip+Base64 encoded translation for;'; cr. strm nextPutAll: '#('. keys do: [:each | strm nextPutAll: '''', each, ''' '.]. strm nextPutAll: ')"'; cr; cr. strm nextPutAll: 'NaturalLanguageTranslator loadForLocaleIsoString: '. strm nextPut: $'. strm nextPutAll: translator localeID isoString. strm nextPut: $'. strm nextPutAll: ' fromGzippedMimeLiteral: '. strm nextPut: $'. + strm nextPutAll: code squeakToUtf8 asByteArray zipped base64Encoded. - strm nextPutAll: (Base64MimeConverter mimeEncode: s2) contents. strm nextPutAll: '''.'. strm cr. ]. (StringHolder new contents: cont) + openLabel: 'exported codes in UTF8+Gzip+Base64 encoding' translated! - openLabel: 'exported codes in Gzip+Base64 encoding' translated!

1 0

The Trunk: GetText-nice.36.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: GetText-nice.36.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: Collections-nice.622.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

Nicolas Cellier uploaded a new version of Collections to project The Trunk: http://source.squeak.org/trunk/Collections-nice.622.mcz ==================== Summary ==================== Name: Collections-nice.622 Author: nice Time: 1 May 2015, 12:40:25.475 am UUID: 93c764da-c5b6-4fa6-aa98-a9ad54611907 Ancestors: Collections-mt.621 #toBraceStack: is not used for compiling { } for so long that it's really time to get rid of it. Symbol>>numArgs: does not need to copy self into a temp var. =============== Diff against Collections-mt.621 =============== Item was removed: - ----- Method: Collection>>toBraceStack: (in category 'private') ----- - toBraceStack: itsSize - "Push receiver's elements onto the stack of thisContext sender. Error if receiver does - not have itsSize elements or if receiver is unordered. - Do not call directly: this is called by {a. b} := ... constructs." - - self size ~= itsSize ifTrue: - [self error: 'Trying to store ', self size printString, - ' values into ', itsSize printString, ' variables.']. - thisContext sender push: itsSize fromIndexable: self! Item was changed: ----- Method: Symbol>>numArgs: (in category 'system primitives') ----- numArgs: n "Answer a string that can be used as a selector with n arguments. TODO: need to be extended to support shrinking and for selectors like #+ " + | numArgs aStream offs |. + (numArgs := self numArgs) >= n ifTrue: [^self]. - | selector numArgs aStream offs | - - selector := self. - (numArgs := selector numArgs) >= n ifTrue: [^self]. aStream := WriteStream on: (String new: 16). aStream nextPutAll: self. (numArgs = 0) ifTrue: [aStream nextPutAll: ':'. offs := 0] ifFalse: [offs := 1]. 2 to: n - numArgs + offs do: [:i | aStream nextPutAll: 'with:']. + ^aStream contents asSymbol! - ^aStream contents asSymbol - - !

1 0

The Trunk: Collections-nice.622.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: Collections-nice.622.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: System-nice.731.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

Nicolas Cellier uploaded a new version of System to project The Trunk: http://source.squeak.org/trunk/System-nice.731.mcz ==================== Summary ==================== Name: System-nice.731 Author: nice Time: 30 April 2015, 11:21:11.155 pm UUID: bef33999-82b0-49a5-a17a-536c57394b83 Ancestors: System-kfr.730 A DummyStream may do nothing, but shall mimic the answer of a regular stream. =============== Diff against System-kfr.730 =============== Item was changed: ----- Method: DummyStream>>nextStringPut: (in category 'accessing') ----- nextStringPut: aString + "do nothing" + ^aString! - "do nothing"!

1 0

The Trunk: System-nice.731.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: System-nice.731.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

1 0

The Trunk: Morphic-mt.952.mcz
by commits＠source.squeak.org 30 Apr '15

30 Apr '15

Marcel Taeumel uploaded a new version of Morphic to project The Trunk: http://source.squeak.org/trunk/Morphic-mt.952.mcz ==================== Summary ==================== Name: Morphic-mt.952 Author: mt Time: 30 April 2015, 2:07:32.024 pm UUID: 993bb899-d198-9245-8d5a-69a3acb7f9a9 Ancestors: Morphic-mt.951 Faster check for scroll bar visibility in scroll panes. =============== Diff against Morphic-mt.951 =============== Item was changed: ----- Method: ScrollPane>>hIsScrollbarShowing (in category 'geometry testing') ----- hIsScrollbarShowing "Return true if a horz scroll bar is currently showing" + ^ hScrollBar owner notNil! - ^submorphs includes: hScrollBar - ! Item was changed: ----- Method: ScrollPane>>vIsScrollbarShowing (in category 'geometry testing') ----- vIsScrollbarShowing "Return true if a retractable scroll bar is currently showing" + ^ scrollBar owner notNil - ^submorphs includes: scrollBar !

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

Packages April 2015