Etoys: Sugar-kfr.26.mcz

Karl Ramberg uploaded a new version of Sugar to project Etoys:
http://source.squeak.org/etoys/Sugar-kfr.26.mcz

==================== Summary ====================

Name: Sugar-kfr.26
Author: kfr
Time: 19 January 2014, 7:07:18 pm
UUID: 7e49cc91-7fd0-0e4b-877c-d562eb428228
Ancestors: Sugar-kfr.25

Read gconf.xml new format. (SQ-1200)
Gustavo Duarte

=============== Diff against Sugar-kfr.23 ===============

Item was changed:
  ----- Method: SugarLauncher>>gconfPropertiesAt: (in category 'gconf') -----
  gconfPropertiesAt: aString
  | dir |
  "search up tree to guess home dir"
  dir := Project squeakletDirectory.
  [dir pathName = '/'] whileFalse: [
  dir := dir containingDirectory.
  [FileStream
  readOnlyFileNamed: dir pathName, '/.gconf', aString, '/%gconf.xml'
  do: [:f |
  | props |
  props := Dictionary new.
  (XMLDOMParser parseDocumentFrom: f)
  tagsNamed: #entry do: [:entry |
  props at: (entry attributeAt: 'name')
+ put: (entry attributeAt: 'value'
+ ifAbsent: [entry elements first contentString])].
- put: entry elements first contentString].
  ^props].
  ] on: FileDoesNotExistException do: [:ignore | ].
  ].
  ^self error: 'cannot find gconf path ', aString!

_______________________________________________
etoys-dev mailing list
[hidden email]
http://lists.squeakland.org/mailman/listinfo/etoys-dev