--- a/FileApplicationNoteBook.st Thu Jul 19 15:36:20 2018 +0200
+++ b/FileApplicationNoteBook.st Thu Jul 19 15:36:58 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 2002 by eXept Software AG
All Rights Reserved
@@ -528,7 +530,7 @@
^ nil.
].
- self openAlwaysInTextEditor value ifFalse:[
+ self openAlwaysInTextEditor value == false ifTrue:[
applList := self applicationList.
applItem := applList
detect:[:eachApplItem|
@@ -547,7 +549,7 @@
appl notNil ifTrue:[ ^ appl].
].
].
- self alwaysUseSmalltalkTools value ifFalse:[
+ self alwaysUseSmalltalkTools value == true ifFalse:[
((anItem fileName mimeTypeOfContents ? '') startsWith:'text') ifFalse:[
"/ fallback: open a system utility
OperatingSystem
@@ -563,6 +565,7 @@
^ self openDefaultApplicationByItem:anItem.
"Modified: / 22-06-2017 / 18:43:15 / cg"
+ "Modified: / 19-07-2018 / 15:34:22 / Stefan Vogel"
!
openApplicationClass:aClass withItem:anItem withType:aType