6 Jul
2013
6 Jul
'13
4:30 p.m.
Hi guys,
I am testing the source code of the Glamour chapter. I have 2 problems:
- This configuration doesn't load:
------
Gofer new
smalltalkhubUser: 'Moose' project: 'Glamour';
package: 'ConfigurationOfGlamour';
load.
(Smalltalk at: #ConfigurationOfGlamour) perform: #loadDefault.
------
- The following example source code doesn't work in Moose4.8 but works on Moose 4.7:
------
| browser |
browser := GLMFinder new
variableSizePanes;
title: 'Find your file';
yourself.
browser show: [:a |
a list
when: #isDirectory;
display: [:each | [each children sorted]
on: Exception
do: [Array new]];
format: #basenameWithIndicator].
browser show: [:a |
a text
when: #isFile;
display: [:entry | [entry readStream contents]
on: Exception
do:['Can''t display the content of this
file']]].
browser openOn: FileSystem disk root.
------
Can anyone help me to fix that ?
Cheers,
Jannik