[Glamour] default selection in ListPresentation
by Cyrille Delaunay
Hello,
Is there a way to set a default selection to a list presentation? so that
when I open the browser, the morphic list has already a value selected.
I tried that:
|tmpBrowser|
tmpBrowser := GLMTabulator new.
tmpBrowser row: #list.
tmpBrowser transmit to: #list; andShow: [:a |
a list
display: [:input | input];
selection: #a;
yourself
].
tmpBrowser openOn: #( b c d v a d f r).
but the list still open with nothing selected
5 years, 2 months
JavaScript to MSE
by Alexandre Bergel
Hi!
Hernán has worked on an Eclipse plugging to produce MSE file from a JavaScript application. It works well.
The plugging is available on:
https://bitbucket.org/hcvazquez/mseexporterjs/wiki/Home <https://bitbucket.org/hcvazquez/mseexporterjs/wiki/Home>
Here is a teaser:
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu <http://www.bergel.eu/>
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
6 years, 7 months
cool animation using Viva...
by Alexandre Bergel
Just insect that code :-)
-=-=-=-=-=-=-=-=-=
v := RTView new.
seconds := 7.
timer := TRVITimer new cycleLength: seconds.
rotationRatio := 0.2.
shape := RTRotatedLabel new.
shape
angleInDegree: [ :cls |
| valueEnd |
valueEnd := cls numberOfMethods negated / rotationRatio.
TRVIAnimatedValue new
evaluator: [ :t | 0 interpolateTo: valueEnd at: t ];
timer: timer;
yourself ].
shape text: [ :cls | ' ' , cls name ].
shape color: (Color black alpha: 0.2).
v addAll: (shape elementsOn: Collection withAllSubclasses).
v canvas color: Color white.
v addAnimation: RTResetAllShape new.
timer start.
v
-=-=-=-=-=-=-=-=-=
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
6 years, 10 months
Can't load OSSubprocess
by Anne Etien
(From Olivier Auverlot, that is not yet accepted in the list, (I will transfer to him until he is on the list))
Hi,
I need to use OSSubprocess in a project with Moose 6. I just tried to load it in a new Moose 6 image but that's doesn't work. By the way, OSSubprocess works fine in the latest Pharo 5 image.
Please find below the lats lines of Pharo error log:
VM: Mac OS - intel - 1092 - CoInterpreter VMMaker.oscog-eem.1726 uuid: 6a968923-b541-4573-bc4f-64fb95e6462d Mar 15 2016
StackToRegisterMappingCogit VMMaker.oscog-eem.1726 uuid: 6a968923-b541-4573-bc4f-64fb95e6462d Mar 15 2016
https://github.com/pharo-project/pharo-vm.git <https://github.com/pharo-project/pharo-vm.git> Commit: 2b53ae43e6a030759fbfa6ce8737a7f55ba76dd1 Date: 2016-03-15 19:05:06 +0100 By: Esteban Lorenzano estebanlm(a)gmail.com <mailto:estebanlm@gmail.com> Jenkins build #576 <https://github.com/moosetechnology/Moose/issues/576>
Image: Pharo5.0 [Latest update: #50732]
UndefinedObject(Object)>>doesNotUnderstand: #waitTimeoutMSecs:
Receiver: nil
Arguments and temporary variables:
aMessage: waitTimeoutMSecs: 1000
exception: MessageNotUnderstood: receiver of "waitTimeoutMSecs:" is nil
resumeValue: nil
Receiver's instance variables:
nil
By the way, OSSubprocess works fine in the latest Pharo 5 image.
Someone has an idea ?
Olivier
7 years, 1 month
Visualizing Code Duplication (a.k.a Reviving Duploc?)
by Alexandre Bergel
Hi!
Yesterday I did a bit of programming. I thought that visualizing code duplication is a nice 20 minutes of coding.
Visualizing code duplication. A square around the diagonal indicates code duplication. All methods of the analyzed application are located horizontally and vertically. A red dot indicates duplication between two methods. This technique to visualize duplication is rooted in analyzing chromosomes.
Here are some visualizations:
This is Glamour:
Trachel:
Nautilus:
Here is the code:
=-=-=-==-=-=-==-=-=-==-=-=-==-=-=-=
| packageNamePattern1 packageNamePattern2 minimumLinesOfCodeToBeConsidered p1 methods1 p2 methods2 m |
packageNamePattern1 := UIManager default
request: '-- 1 -- Enter a pattern of a package (e.g., Roassal2 or Roassal2*)'
initialAnswer: 'Roassal2'
title: 'Enter the name of a package to visualize the duplication'.
packageNamePattern2 := UIManager default
request: '-- 2 -- Enter a pattern of a package (e.g., Trachel or Trachel*)'
initialAnswer: 'Trachel'
title: 'Enter the name of a package to visualize the duplication'.
minimumLinesOfCodeToBeConsidered := 5.
p1 := RPackageOrganizer default packages select: [ :p | packageNamePattern1 match: p packageName ].
methods1 := (((p1 flatCollect: #methods) groupedBy: #methodClass) values flatCollect: #yourself) select: [ :me | me sourceNonEmptyCodeLinesCached size >= minimumLinesOfCodeToBeConsidered ].
p2 := RPackageOrganizer default packages select: [ :p | packageNamePattern2 match: p packageName ].
methods2 := (((p2 flatCollect: #methods) groupedBy: #methodClass) values flatCollect: #yourself) select: [ :me | me sourceNonEmptyCodeLinesCached size >= minimumLinesOfCodeToBeConsidered ].
m := RTDepMatrix new.
m shape box color: Color red.
m interaction popupText.
m function: [ :m1 :m2 |
| a1 a2 |
a1 := m1 sourceNonEmptyCodeLinesCached.
a2 := m2 sourceNonEmptyCodeLinesCached.
(a1 intersection: a2) size >= 5 "((a1 size min: a2 size) - 1)" ].
m horizontal: methods1.
m vertical: methods2.
m inspect
=-=-=-==-=-=-==-=-=-==-=-=-==-=-=-=
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
7 years, 1 month
Where to submit issues?
by Alexandre Bergel
Hi!
Before we had the google project. What do we have today?
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
7 years, 1 month
Group>>queryOutgoingAccesses ?
by Alexandre Bergel
Hi!
Should be we able to send #queryOutgoingAccesses to a Famix class group?
Cheers,
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
7 years, 1 month
Status of Bloc & Bric?
by Alexandre Bergel
This mailing list has been incredibly silent for a couple of month. Not sure whether this is something positive or not.
I am wondering, what is the status of Bloc & Bric?
Alexandre
--
_,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:
Alexandre Bergel http://www.bergel.eu
^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
7 years, 1 month
