--- a/AbstractLauncherApplication.st Thu Jun 30 07:04:36 2016 +0200
+++ b/AbstractLauncherApplication.st Tue Jun 28 08:06:44 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1997 by eXept Software AG
All Rights Reserved
@@ -7549,7 +7547,7 @@
|dir|
package notNil ifTrue:[
- dir := Smalltalk packageDirectoryForPackageId:package.
+ dir := Smalltalk getPackageDirectoryForPackage:package.
dir notNil ifTrue:[
FileBrowser default openOn:dir.
] ifFalse:[
@@ -7589,6 +7587,8 @@
].
].
^ m
+
+ "Modified: / 28-06-2016 / 07:55:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
loadAction:doBrowse
@@ -7976,7 +7976,7 @@
].
] ifFalse:[
"/ try to find the package's source
- dir := Smalltalk packageDirectoryForPackageId:package.
+ dir := Smalltalk getPackageDirectoryForPackage:package.
dir notNil ifTrue:[
"/ is there a project definition class's source?
className := ProjectDefinition projectDefinitionClassNameForDefinitionOf:package.
@@ -8027,6 +8027,8 @@
info := info withColor:Color red.
].
infoTextHolder value:info.
+
+ "Modified: / 28-06-2016 / 07:55:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
updateAction:whatChanged parameter:parameter